Delphi-Quellcode:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case key of // sind die tasten i und k bei mir
73 : begin
if shape2.Top > 5
then shape2.Top := shape2.Top - 4;
end;
75 : begin
if shape2.Top + shape2.Height < button1.Top //als unteren rand gesetz den button; und die 5 oben als oberen
then shape2.Top := shape2.Top + 4; // +4 = bewegung des panels
end;
so hab ichs gemacht ... ist aber auch noch nicht so lange her bin auch anfänger hab ne weile gebraucht dafür ^^
Hier eine Liste der wichtigsten Tastencodes:
9 = TAB-Taste
13 = Eingabetaste (RETURN)
16 = Umschalt-Taste (Shift)
17 = STRG-Taste (CTRL)
18 = ALT-Taste
27 = Escape-TAste (ES)
32 = Leertaste
37 = Cursor links
38 = Cursor hoch
39 = Cursor rechts
40 = Cursor runter
48 (für die 0) bis 57 (für die 9) = Ziffern
65 (für das a) bis 90 (für das z) = Buchstabentasten
Hinweis:
für die Großbuchstaben müssen Sie die Buchstabentaste in Verbindung mit der Umschalttasten drücken