在 Delphi Mdi 应用程序的父窗口中使用 KeyDown 事件

Question

即使子窗口具有焦点，如何让 KeyDown 事件在 Delphi (2007) MDI 应用程序父窗口中工作？

我想实现一个在 MDI 应用程序中显示帮助屏幕的快捷键 (F1)，我已将 KeyDown 过程添加到 MDI 父窗口并在父窗口和子窗口中启用 KeyPreview，但它不起作用预期的。

如果我在Parents KeyDown 代码中放置一个断点，我可以看到它永远不会执行，即使没有打开子窗口。但是如果我将相同的代码添加到子窗口，它就可以正常工作。

有没有办法让父窗口接收按键，即使子窗口有焦点，因为将代码添加到 25+ 表单接缝有点浪费？

Answer 1

这周我遇到了完全相同的问题！我通过在主窗体上的 ActionManager 中创建一个操作来修复它。此操作将打开帮助文件并将 F1 键设置为快捷方式。它也适用于所有 MDI 子屏幕。