如何设置panel上的拖动问题。

Question

用一个panel组件。如何写才能够拖动panel整个窗体都移动。就像标题栏一样的拖动。请指教。

Answer 1

不难！在Panel的OnMouseDown中写：
if Button=LButton then
begin
  ReleaseCapture;
  SendMessage(Handle,WM_SYSCOMMAND,$F012,0);
end;

Answer 2

OnMouseDown:
begin
  ReleaseCapture;
  form1.perform(WM_SYSCOMMAND,$F012,0);
end;这样也行！

Answer 3

再问一下,最小化的API是什么?我用的是CLOSEWINDOW,但是不知道HWND参数怎么用?呵呵