在窗体的OnMouseDown事件中加入下面几行代码即可
If Button = mbleft Then begin ReleaseCapture; SendMessage(MainForm.Handle,WM_NCLBUTTONDOWN,HTCAPTION,0); end;
若窗体的表面被别的控件履盖掉,则需要把上面的代码加入履盖的控件里面。
posted on 2010-04-17 16:54 zimmerk 阅读(675) 评论(0) 编辑 收藏 举报