如何使用Windows本身的API来进行窗口的移动和大小调整

[数字蛋糕]

比如说我把Form设成无边界，然后又想使用Windows默认的窗体移动和大小设置以获得稳定性和统一性。
注：我的窗体已经全部为Panel所覆盖，无法取得NCHitTest事件。

[huiyugan]

这是移动窗体的Windows API，具体的请参照帮助文件。

function MoveWindow(hWnd: HWND; X, Y, nWidth, nHeight: Integer; bRepaint: BOOL): BOOL; stdcall;

hWnd指窗体的句柄，也即Form1.Handle ,x,y即你要移动到的地方的左上点，并设bRepaint为false

[wangwang45]

invoke this api SetWindowPos

[zengyufeng]

你可以在 Panel 的鼠标事件里写代码来移动 Form 呀
1、OnMouseDown
OldX := X;
OldY := Y;

2、OnMouseMove
if Shift = [ssLeft] then
begin
Form1.Left := Form1.Left + (X - OldX);
Form1.Top := Form1.Top + (Y - OldY);
end;

[数字蛋糕]

感谢大家的回答，可是可能我原来没有说清楚。
我的意思是窗体移动或改变大小时，能有虚线框（如果系统是这么设置的话）出现。
是这个意义上的统一......

[数字蛋糕]

我最近发现了一个消息:WM_SYSTEMCOMMAND(或者有缩写,忘记了)
好像这个消息包含了很多的内容.比如应用程序的最小化之类的.
谁有这个消息的详细资料?贴出来看看,我想可能会对这个问题有所帮助的.

[Nicrosoft]

SetWindowPos可以满足你所有的需要