![]() |
Schliessen eines Formulars
Hallo zusammen.
Hab mal ne frage, ich hätte gärne, dass mein Formular sich beim drücken von ALT+F4 und ESC schliesst. Wie mache ich das??? Thanks XaRidA :angel: |
Re: Schliessen eines Formulars
Hi,
Alt+F4 sollte von Windows her automatisch gehen. Für ESC musst du das OnKeyPress bzw. OnKeyUp Ereignis behandeln und auf die ESC Taste prüfen. Setze dann zudem die Eigenschaft KeyPreview vom Form auf True ;) mfG mirage228 |
Re: Schliessen eines Formulars
Hi,
bei ALT+F4 sollte sich das Formular eh schließen :) Für Esc ist eine Möglichkeit folgende: Form1.KeyPreview auf true setzen, im OnKeyDown/Up Ereignis prüfen, ob Esc gedrückt wurde ( ![]() Gruß Stephan :dance: |
Re: Schliessen eines Formulars
statt OnKeyDown/Up kann man auch OnKeyPress verwenden.
oder, was mir besser gefallen würde, ein PopupMenu verwenden, Menueeintrag "Beenden" mit Hotkey Escape eintragen und im OnClick ein Close Roderich |
Re: Schliessen eines Formulars
Wie kann ich das auf die ESC Taste prüfen??
XaRidA :angel: |
Re: Schliessen eines Formulars
Asciiwert für ESC ist 27.
|
Re: Schliessen eines Formulars
Der Parameter Key in OnKeyXXX gibt an, welche Taste gedrück wurde.
Virtuelle Tastencodes sind Konstanten für die Tasten, z.B. auch "VK_ESCAPE" edit: Ich persönlich kann mit "IF Key = VK_ESCAPE" mehr anfangen als mit "IF Key = 27" .. ;) Gruß Stephan :dance: |
Re: Schliessen eines Formulars
Hier mal schön mit Delphi-tags: *pingeligbin* :tongue: :mrgreen:
Delphi-Quellcode:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState); begin if key = vk_escape then Application.MainForm.Close; end; |
Re: Schliessen eines Formulars
Hey merci,
das funzt super. :thumb: Thanks XaRidA :angel: |
Alle Zeitangaben in WEZ +1. Es ist jetzt 17:31 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz