WinAPI: MoveWindow - 改变窗口的位置与大小

//声明:

MoveWindow(

  hWnd: HWND;               {窗口句柄}

  X, Y: Integer;            {位置}

  nWidth, nHeight: Integer; {大小}

  bRepaint: BOOL            {是否重绘}

): BOOL;


 
   




//举例:

procedure TForm1.Button1Click(Sender: TObject);

begin

  MoveWindow(Button1.Handle, 0, 0, ClientWidth, ClientHeight, True);

end;


 
   




//效果图:

---