Delphi 10.4中TSynEdit无法检测响应Tab/Shift+Tab按键如何解决

问题背景 #

• 开发环境：Delphi 10.4 社区版
• 组件来源：通过系统自带GetIt包管理器安装的SynEdit组件

复现步骤与异常表现 #

1. 新建空白VCL工程，在主窗体上放置TSynEdit控件后直接启动程序
2. 按下TAB或SHIFT+TAB组合键，控件无任何缩进响应
3. 在TSynEdit的CommandProcessor、ExecuteCommand、DoTabKey三个方法中添加断点，按下对应按键时调试器无法命中断点
4. 检查控件Keystrokes属性可见TAB对应的按键映射条目存在，但实际不生效；手动修改ecTab命令绑定的快捷键时，下拉选项列表中不存在Tab/Shift+Tab可选值

其他同功能缩进快捷键可正常触发，例如CTRL+SHIFT+I（缩进）、CTRL+SHIFT+U（取消缩进）

解决方法 #

这个问题是GetIt分发版SynEdit的已知适配问题，按以下两步操作即可修复：

1. 开启控件TAB键接收权限
   VCL框架默认会将TAB/Shift+TAB作为控件焦点切换的全局导航键，不会直接派发给窗体上的控件。选中TSynEdit控件，在属性面板找到WantTabs属性，将值设置为True，控件即可获得TAB按键的处理权限。
2. 手动补全快捷键映射
   GetIt版本的SynEdit快捷键下拉列表漏了Tab相关选项，不需要重新安装组件，手动输入即可补全：
   • 点击Keystrokes属性右侧的省略号按钮打开快捷键配置编辑器
   • 找到命令为ecTab的条目，直接在ShortCut属性输入框中手动输入Tab（无需选择下拉列表项，手动输入的内容可以被正常识别）
   • 找到命令为ecShiftTab的条目，同样在ShortCut属性输入框中手动输入Shift+Tab
   • 保存配置后重新编译运行程序，TAB/Shift+TAB的缩进功能即可正常触发，之前添加的断点也可以正常命中。

内容的提问来源于stack exchange，提问作者NihmarIsProgramming