这个消息的具体作用就是, 让你根据给出坐标来决定告诉系统鼠标在窗体的什么位置.
不论坐标是什么, 在hitResult你告诉系统是什么位置系统就认为是什么了.
下面是一个例子, 当鼠标在Form上的时候, 告诉系统你的鼠标实在Form上面的Caption区域,
不论在什么位置, 你都可以拖着Form移动.
type
TForm1 = class(TForm)
private
procedure WMNCHitTest(var Message: TWMNCHitTest); message WM_NCHITTEST;
public
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
{ TForm1 }
procedure TForm1.WMNCHitTest(var Message: TWMNCHitTest);
begin
Message.Result := HTCaption;
end;
end.