Thema: Image bewegen

Einzelnen Beitrag anzeigen

Namenloser

Registriert seit: 7. Jun 2006
Ort: Karlsruhe
3.724 Beiträge
 
FreePascal / Lazarus
 
#4

Re: Image bewegen

  Alt 28. Nov 2009, 20:42
Dein Formular hat ein Event namens OnKeyDown. Dieses Event wird immer dann ausgelöst, wenn der Nutzer eine Taste drückt und das Formular den Fokus hat. Damit du weißt, in welche Richtung das Image bewegt werden soll, musst du natürlich noch abfragen, welche Tastae gedrückt wurde. Die Taste ist im Parameter "Key" angegeben, für die Pfeiltasten gibt es die Konstanten VK_LEFT, VK_RIGHT, VK_UP und VK_DOWN.

Lange Rede, kurzer Sinn:
Delphi-Quellcode:
procedure TForm1.FormKeyDown(..., const Key: integer, ...);
begin
  case Key of
    VK_LEFT: Image1.Left := Image1.Left - 10;
    VK_RIGHT: Image1.Left := Image1.Left + 10;
    VK_UP: Image1.Top := Image1.Top - 10;
    VK_DOWN: Image1.Top := Image1.Top + 10;
  end;
end;
Eine andere Möglichkeit wäre ein Timer/eine Schleife, in dem/der du den Zustand (Gedrückt/Nicht gedrückt) der Tasten selbst abfragst. Das ginge dann mit Delphi-Referenz durchsuchenGetAsncKeyState.
  Mit Zitat antworten Zitat