Thema: Delphi ASCII-Code für "Entf"

Einzelnen Beitrag anzeigen

Christian18

Registriert seit: 9. Dez 2003
Ort: Hamburg
1.279 Beiträge
 
#3

Re: ASCII-Code für "Entf"

  Alt 11. Dez 2003, 09:48
Hallo General 2003

Ich habe vieleicht einen kleinen Tip für dich. Wenn du mit der ESC Taste dein programm schließen willst oder eine andere Form mit der ESC Taste schließen willst dann kannst du diese Procedure nehmen mußt du aber nicht!

Delphi-Quellcode:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if shift=[] then
    case key of
      27: Close;
    end;
end;
noch ein kleiner tip statt close kannst du natürlich auch andere proceduren ablaufen lassen.

27 = ESC Taste
45 = Einf. Taste
13 = Enter Taste
46 = ENTF Taste

Bye Bye Christian18
  Mit Zitat antworten Zitat