tastenzuweisung

[Brueckenhauer]

Delphi-Quellcode:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if key=VK_LEFT then
  begin
    Button1.left:=Button1.left-10;
    Button1.Caption:='Left';
  end;
   if key=VK_RIGHT then
  begin
    Button1.left:=Button1.left+10;
    Button1.Caption:='Right';
  end;
end;

keypreview der form ist auf true gestellt, aber es passiert trotzdem nix, woran liegt das?