Delphi检测表单中的箭头键[重复]

Question

我有一个 Delphi VCL 表单，其中包含许多包含组件的框架。我想检测表单中的箭头键点击，以便我可以在以图形方式排列在矩阵中的帧之间移动。 Keypress 和 Keydown 事件处理程序都无法响应箭头键按下。我在这两种方法中都为虚拟键创建了案例元素，但事件不是由箭头键触发的。这在 Delphi 中是如何实现的？

Answer 1

方向键由操作系统保留用于导航目的。 UI 控件不会接收箭头键按下的窗口消息，除非它们明确请求。您需要：

• 处理 Win32 WM_GETDLGCODE 消息并在其返回值中包含 DLGC_WANTARROWS 标志。

• 处理 VCL 的自定义 CM_DIALOGKEY 消息。

• 通过 Win32 SetWindowsHookEx() 函数使用键盘挂钩。