Hey,
[verdammter Browser, musste das zwei mal schreiben - grrrr...]
ich möchte immer wenn die CTRL-Taste gedrückt wird die Leertaste virtuell drücken.
Dazu verwende ich momentan folgenden Code:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
if enabled then enabled := false
else enabled := true;
while enabled do
begin
if (GetAsyncKeyState(VK_CONTROL) and $8000) <> 0 then Keybd_Event(VK_SPACE,0,0,0);
Application.ProcessMessages;
end
end;
Ist unschön und aufwändig, aber es soll schnell gehen und ich hab mich noch nie mit Hooks befasst.
Allerdings wird VK_SPACE nicht einmal, sondern ca. 100mal gesendet.
Warum?