Thema: Delphi KeyPress Problem

Einzelnen Beitrag anzeigen

thomas2009
(Gast)

n/a Beiträge
 
#1

KeyPress Problem

  Alt 22. Jan 2009, 02:17
Hallo
der Panel bewegt immer mit 10 Pixel !
egal ob ich die taste Pfeil allein oder CTRL+Pfeil Taste
Delphi-Quellcode:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 if ((Key = 17) and (Key = 39)) then begin
 Panel1.left:= Panel1.left+1;
end;

 if Key = 39 then begin
Panel1.left:= Panel1.left+10;
end;
end;
Woran liegt es dann ?
  Mit Zitat antworten Zitat