user-interface - Delphi：将键盘上的小键盘键映射到 GUI 上的按钮

Question

所以我做了一个简单的小计算器，我想通过允许用户使用键盘上的 Numpad 而不是使用鼠标与 GUI 交互来为其添加更多功能。

如何接收来自键盘的输入？

提前致谢！
PrimeBeat

标签： user-interfacedelphidelphi-xe2

Answer 1

我已经做到了。我的意思是一个简单的计算器应用程序。

为了让键盘用户输入，我在表单上放了一个 TEdit。这是表单上唯一获得键盘输入的组件。然后在运行时我将编辑移出视图：

procedure TCalculatorForm.FormResize(Sender: TObject);
begin
    EntryEdit.Left := ClientWidth + 10;
end;

这使得 TEdit 不可见，但它保持活动状态。当用户在键盘上键入时，此 TEdit 接收字符。我使用 OnKeyPress 事件来处理它并像用户单击按钮一样在计算中采取行动。