Oder du setzt das gesamte Spiel (ich nehme mal an so twas in der Arte ist es) gleich mit einem Main-Loop um (zB Timer), das ist eh besser. Dann kannst du regelmäßig mit GetAsyncKeyState die Tasten überprüfen
Diese könnte dann pseudocodemäßig so aussehen:
Delphi-Quellcode:
procedure CheckKeys;
begin
if GetAsnycKeyState(vk_left)<0 then
Player.MoveLeft;
if GetAsyncKeyState(vk_right)<0 then
Player.MoveRight
end;
procedure MainLoop;
begin
CheckKeys;
Render;
end;