S svw0506 Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-26 #2 两种方案： 1、设Form的BorderStyle=bsNone 2、截获窗体移动的消息
A alan_yang Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-26 #3 在public中定义过程: procedure WMNCHitTest(var Msg: TMessage); message WM_NCHITTEST; public { Public declarations } procedure Tmainfrm.WMNCHitTest(var Msg: TMessage); begin inherited; // 这样,移动就不可能了... Msg.Result := HTCLIENT; end;
在public中定义过程: procedure WMNCHitTest(var Msg: TMessage); message WM_NCHITTEST; public { Public declarations } procedure Tmainfrm.WMNCHitTest(var Msg: TMessage); begin inherited; // 这样,移动就不可能了... Msg.Result := HTCLIENT; end;
