Image bewegen

[Jonski]

Toll danke das motiviert mich!

Ich weiß, aber ich habe das gestern erst gelernt und ich find meine Fehler nicht.

So wie hier:

Delphi-Quellcode:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);

begin

case Key of
  VK_Left:
  if Image6.Left > Image2.Left +43 then
    begin
    Image6.Left:= Image6.Left -10;
    end;
  VK_Right:
  if Image6.Left < Image3.Left -100 then
    begin
    Image6.Left:= Image6.Left +10;
    end;
end;
end;

Gebt mir nur einen Tipp