在窗体的OnMouseDown事件中加入下面几行代码即可If Button = mbleft Then
begin
ReleaseCapture;
SendMessage(form1.Handle, WM_NCLBUTTONDOWN, HTCAPTION,0);
end;若窗体的表面被别的控件履盖掉,则需要把上面的代码加入履盖的控件里面。版权归金晨所有,请不要转载!
begin
ReleaseCapture;
SendMessage(form1.Handle, WM_NCLBUTTONDOWN, HTCAPTION,0);
end;若窗体的表面被别的控件履盖掉,则需要把上面的代码加入履盖的控件里面。版权归金晨所有,请不要转载!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货