调用onKeyDown Delphi

Question

如果我有 onKeyPress 事件，那么我可以用

来调用它

var theKey : Char;
....
theKey := #13;  // ENTER key
FormKeyPress(Sender,theKey);

如果我有一个 onKeyDown 事件，如何以相同的方式调用？

Answer 1

您想要这样做是完全错误的，因为键盘事件旨在处理来自键盘的用户输入。你应该直接执行你想要的代码;您还可以在关键事件中使用该代码来响应用户输入，这清楚地将用户界面与程序逻辑分开。

话虽如此，你可以用同样的方式调用事件。例如，要发送 Enter ：

Key := 13;
FormKeyDown(Sender, Key, []);

发送 Ctrl K ：

Key := Ord('K');
FormKeyDown(Sender, Key, [ssCtrl]);