TAstatur

[Airblader]

Zitat von 3_of_8:

Genau das macht das Ding doch eh.

Nein, das KeyDown wird nur beim Drücken einmalig ausgeführt, soweit ich weiß.

@gjs/Frosch

Am besten einen Timer nehmen und reinschreiben:

Delphi-Quellcode:

procedure TForm1....;
begin
   if GetASyncKeyState(VK_UP) < 0 then
      Image1.Top := Image1.Top - 1;
end;

air