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

[inthefly]

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

[blazingfire]

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

[knock]

OnMouseDown:
begin
ReleaseCapture;
form1.perform(WM_SYSCOMMAND,$F012,0);
end;

这样也行！

[inthefly]

真好。谢谢了。

[inthefly]

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