本文介绍了一种在Delphi中使用TApplicationEvents控件进行消息处理的方法。通过案例展示了如何设置事件处理过程，并通过发送特定消息来触发这些事件。这对于需要在后台执行任务或响应特定系统事件的应用程序非常有用。
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);
扫一扫
2211
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
