Delphi TMessage[6] Perform、SendMessage、PostMessage - 发送并响应消息
Delphi TMessage[6] Perform、SendMessage、PostMessage - 发送并响应消息
Perform //控件收到指定的Windows消息时进行响应。
1 | function Perform(Msg: Cardinal ; WParam, LParam: Longint ): Longint ; |
- 调用Perform绕过Windows消息队列,直接向控件的窗口过程发送消息。
- Perform使用在Msg参数中传递的消息ID、在WParam和LParam中传递的消息参数以及零的结果字段填充消息记录(类型为TMessage)。Perform然后将消息记录传递给WindowProc方法进行处理。
SendMessage //将指定的消息发送到一个或多个窗口。该函数调用指定窗口的窗口过程,直到窗口过程处理完消息后才返回。相反,PostMessage函数将消息发布到线程的消息队列并立即返回。
PostMessage //发送消息到线程的消息队列中并立即返回
注意:Application.OnMessage 只接收消息队列中的消息, 无法接收 Perform、SendMessage 发送的消息(即OnMessage 收不到消息)
使用示例:
1 2 3 | SendMessage(Handle, WM_LBUTTONDOWN, 0 , 0 ); PostMessage(Handle, WM_LBUTTONDOWN, 0 , 0 ); Form1 . Perform(WM_LBUTTONDOWN, 0 , 0 ); |
创建时间:2022.05.26 更新时间:
博客园 滔Roy https://www.cnblogs.com/guorongtao 希望内容对你有所帮助,谢谢!
【推荐】国内首个AI IDE,深度理解中文开发场景,立即下载体验Trae
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· 【自荐】一款简洁、开源的在线白板工具 Drawnix
· 没有Manus邀请码?试试免邀请码的MGX或者开源的OpenManus吧
· 园子的第一款AI主题卫衣上架——"HELLO! HOW CAN I ASSIST YOU TODAY
· 无需6万激活码!GitHub神秘组织3小时极速复刻Manus,手把手教你使用OpenManus搭建本
· C#/.NET/.NET Core优秀项目和框架2025年2月简报