重载TForm类的CreateParams(TCreateParams& Params)方法。
void __fastcall CreateParams(TCreateParams& Params) { Params.Style&=WS_CAPTION; TForm::CreateParams(Params); }
截取Windows的WM_NCHITTEST消息 在头文件中加入 private: void __fastcall WMNChitTest(TMessage& Msg); protected: BEGIN_MESSAGE_MAP VCL_MESSAGE_HANDLER(WM_NCHITTEST,TMessage,WMNChitTest) END_MESSAGE_MAP(TForm)
在主文件中加入 void __fastcall WMNChitTest(TMessage& Msg) { if(GetAsyncKeyState(VK_LBUTTON)<0) Msg.Result=HTCAPTION; else Msg.Result=HTCLIENT; }  
说明:本教程来源互联网或网友上传或出版商,仅为学习研究或媒体推广,wanshiok.com不保证资料的完整性。
|