KeyPress Problem

[HighSpeed]

Es müsste wohl eher so aussehen:

Delphi-Quellcode:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 if (ssCtrl in Shift) and (Key = 39) then
  Panel1.left := Panel1.left + 1;
 end else if Key = 39 then
  Panel1.left:=  Panel1.left+10;
end;