使用快捷键BkSp的全局操作

作者: 無口君
发布时间: 2024-12-27 08:20:37 (24天前)
转自：

2 条回复

0#
回复此人
易米烊光 | 2019-08-31 10-32

<div class =“post-text”itemprop =“text”> <P> 解决方案很简单，基于Andreas Rejbrand评论，与Delphi相同。 </p> <P> 在OnUpdate上执行操作： </p> <pre> <code> procedure TForm1.aBackUpdate(Sender: TObject); begin aBack.Enabled := not (Screen.ActiveControl is TCustomEdit); end; </code> </pre> <P> 和OnExecute采取行动： </p> <pre> <code> procedure TForm1.aBackExecute(Sender: TObject); begin DoBack; end; </code> </pre> </DIV>

编辑

登录后才能参与评论