58问答库 > delphi 请问form上控件的焦点转移事件是什么，如何获取？

delphi 请问form上控件的焦点转移事件是什么，如何获取？

2025-04-13 16:32:16

推荐回答（1个）

回答（1）：

在Type下面重新定义 Tedit = class(stdctrls.Tedit) procedure CMExit(var Message: TCMExit); message CM_EXIT;在实现部分生成 procedure Tedit.CMExit(var Message: TCMExit);begin if Trim(self.Text)<>'' then begin showmessage('输入的数据无效!'); self.SetFocus; end;end; 查看更多答案>>