在CB中响应动静及自界说动静
在 Borland C++Builder 中,也可以象在 Delphi 中一样响应动静,只是看起来要稍巨大一点。对付系统已界说的动静,可以直接响应,而对付非系统动静可以照如下自界说:
//以下代码写在头文件中:
#define WM_MY_OPEN_CMDLINE_FILE (WM_USER+1) //历程间通讯的自界说动静
#define WM_MY_SEARCH_NODE (WM_USER+2) //查找呼吁的自界说动静
class TSomeForm : public TForm
{//某窗体的类界说
//...类中的其它代码
protected:
//动静的响应进程
void __fastcall OpenCmdLineFile(TMessage Message);
void __fastcall SearchDocumentNode(TMessage Message);
void __fastcall GetWindowMinMaxInfo(TWMGetMinMaxInfo Message);
//通过以下宏界说实现动静的正确响应
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_MY_OPEN_CMDLINE_FILE, TMessage, OpenCmdLineFile)
MESSAGE_HANDLER(WM_MY_SEARCH_NODE, TMessage, SearchDocumentNode)
MESSAGE_HANDLER(WM_GETMINMAXINFO , TWMGetMinMaxInfo, GetWindowMinMaxInfo)
END_MESSAGE_MAP(TForm)
};//end class
--------------------------------------------------------------------------------
//以下为实现代码,写在模块文件中:
void __fastcall TSomeForm::OpenCmdLineFile(TMessage Message)
{//直接通过动静布局通报参数
LPSTR lpCmdLine=(LPSTR)Message.LParam;//从Message中取得参数
this->HandleCmdLineFile(lpCmdLine);//处理惩罚呼吁行的参数
return;
}
--------------------------------------------------------------------------------
void __fastcall TSomeForm::SearchDocumentNode(TMessage Message)
{//响应查找动静
//Message中的参数在此处不需要。
this->SearchNode();
return;
}
--------------------------------------------------------------------------------
void __fastcall TSomeForm::GetWindowMinMaxInfo(TWMGetMinMaxInfo Message)
{//配置主窗口的最小尺寸
MINMAXINFO *MinMaxInfo=Message.MinMaxInfo;
MinMaxInfo->ptMinTrackSize.x=400;
MinMaxInfo->ptMinTrackSize.y=300;
return;
}
个中:TMessage和TWMGetMinMaxInfo范例的界说可拜见:C:\Program Files\Borland\CBuilder\inlucde\vcl\Messages.hpp;其它的动静响应要领与此沟通。
别的,可觉得自界说的动静也界说一个对应的动静布局(如:TSearchNode_Message),至于如何界说动静布局, 可以参考 Borland 的源代码:C:\Program Files\Borland\CBuilder\inlucde\vcl\Messages.hpp