控件如何移动啊？

[fervency]

我看到了一种方法是在OnMouseDown里添加
ReleaseCapture();
SendMessage(Control->Handle,WM_NCLBUTTONDOWN,HTCAPTION,NULL);
但是当鼠标在控件上的时候就无法拖动了，而我需要的就是鼠标在控件上的时候可以拖动它，这怎么实现啊？

[[e-mail]]

mousedown里写
WORD SC_DragMove = 0xF012;
ReleaseCapture();
((TWinControl*)Sender)->Perform(WM_SYSCOMMAND,SC_DragMove,0);

[fervency]

这个代码好像也是当鼠标指向控件的时候移动是失效的。

[[e-mail]]

执行后在控件上按下鼠标并移动控件是可以移动的 我这里跑了一遍没什么问题 不知道你想要的是不是这个效果

[i_love_pc]

对拥有handle的控件是有效的，对无handle的控件是无效的。