Question

我想知道如何在我的delphi应用程序中获取键盘输入而不关注它。我正在编程的应用程序将在我游戏时截取屏幕截图。

我已经编写了屏幕捕获代码，但我错过了最后一篇文章，我们将不胜感激。

Answer 1

您可以注册一个热键（使用RegisterHotKey和UnregisterHotKey功能），并在按下该键时使用WM_HOTKEY消息进行拦截。

试试这个样本

type
  TForm3 = class(TForm)
    procedure FormCreate(Sender: TObject);
    procedure FormDestroy(Sender: TObject);
  private
    { Private declarations }
  public
     procedure WMHotKey(var Message: TMessage); message WM_HOTKEY;
  end;

var
  Form3: TForm3;

implementation


{$R *.dfm}


{ TForm3 }

const
  SaveScreeenHK=666;

procedure TForm3.FormCreate(Sender: TObject);
begin
 RegisterHotKey(Handle, SaveScreeenHK , MOD_CONTROL, VK_F10);
end;

procedure TForm3.FormDestroy(Sender: TObject);
begin
  UnregisterHotKey(Handle, SaveScreeenHK);
end;

procedure TForm3.WMHotKey(var Message: TMessage);
begin
 //call your method here
end;

Answer 2

此后我一直忙着创建一个用于在delphi中获取击键的库。您可以在此处找到它：https://github.com/Kobusvdwalt/DelphiKeylogger

它仍然需要文档，但基本上你只需要调用olgetletter函数。

如何在没有聚焦的Delphi的情况下从键盘输入

2 个答案: