UP者有分：Delphi中用SendMessage函数发移动消息格式是？？？

Question

意思：可以按下窗口并可移动整个窗口！
     不用必需按下标题栏来移动！

Answer 1

builder版的。
在Form的OnMouseDown事件中
void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,
      TShiftState Shift, int X, int Y)
{
    if (Button==mbLeft)
    {
    ReleaseCapture();
    SendMessage(Handle,WM_NCLBUTTONDOWN,HTCAPTION,0);
    }}

Answer 2

谢谢！！！API在那个工具都一样，我主要是想知道消息是什么！