Delphi Bild verschieben - Delphi-PRAXiS

Thema durchsuchen

Ansicht

Themen-Optionen

Bild verschieben

Ein Thema von super_sebbi · begonnen am 7. Apr 2003 · letzter Beitrag vom 8. Apr 2003

Vorheriger Beitrag

Nächster Beitrag

super_sebbi

Registriert seit: 7. Apr 2003
6 Beiträge

7. Apr 2003, 20:16

Ja, danke !!!

Für alle anderen mit ähnlichem Problem:
man kann die tasten auch über Nummer ansprechen. Bei den Courser-Tasten würde das dann so aussehen:

markieren

Delphi-Quellcode:

			procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;

  Shift: TShiftState);

begin

if (Key = $27) then panel1.left := panel1.left + 10;

if (Key = $25) then panel1.left := panel1.left - 10;

if (Key = $26) then panel1.top := panel1.top - 10;

if (Key = $28) then panel1.top := panel1.top + 10;

end;