Jump and Run! need help !

[Bartuc]

also das ist ein auszug des quelltextes

Delphi-Quellcode:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
case Key of
    VK_LEFT: begin
      ImgCartman.Left := ImgCartman.Left - 10;
      Key := 0;
    end;

    VK_Right: begin
      ImgCartman.left := ImgCartman.Left + 10;
      Key := 0;
    end;

    VK_Space: begin
      ImgCartman.Top := ImgCartman.top - 50;
      Key := 0;
    end;
end;

Möchte jetzt nur das zum "Springen" bringen wenn man auf die Leertaste drückt

[edit=r_kerber]Delphi-Tags eingefügt. Mfg, r_kerber[/edit]