Delphi TMessage[5] 未定义的特殊消息:$0118

Delphi TMessage[5] 未定义的特殊消息:$0118

1、$0118 消息特点：

• 此消息只在文本输入类控件(如: TMemo、TEdit)获得焦点时触发，例如，控制输入光标（光标每秒闪烁一次）;
• 此消息每秒发送1次, 和输入光标同步;
• 此消息的方法 WndProc、Dispatch、DefaultHandler 都不能响应，但Application.OnMessage可以响应 

2、示例

?

1 2 3 4 5 6 7 8

procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;   var Handled: Boolean); begin   if Msg.message = $0118 then   begin     Self.Caption := TimeToStr(Now);   end; end;

　　

 

 

 

 

创建时间：2022.05.26　　更新时间：