您的位置:首页 > 其它

通过自定义消息调用主窗体的菜单项

2010-09-24 00:23 253 查看
1.首先放置TApplicationEvents控件。



2.代码



procedure TF_Main.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean);

begin

case
Msg.Message of

WM_USER + 128:

Begin

case Msg.wParam of

1: F_Main. Button129Click(F_Main.Button129);

2: XXXXX;

end;

end;

End;

3.发送消息调用



PostMessage(Application.Handle, WM_USER + 128, 1, 0);
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: 
相关文章推荐