Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Windows Steuerbereich??? (https://www.delphipraxis.net/126797-windows-steuerbereich.html)

AlexanderBrade 2. Jan 2009 18:15


Windows Steuerbereich???
 
Hallo, wie kann ich das "Kreuz"(oben rechts) zum Schließen ansteuern, d.h. wie kann ich beim drücken des "Kreuzes" eine andere Prozedur ähnlich einem Buttononclick ablaufen lassen, z.B. dass ich vor dem Schließen eine Warnung anzeigen lassen kann?

mkinzler 2. Jan 2009 18:17

Re: Windows Steuerbereich???
 
Ereignis .onQueryClose()

AlexanderBrade 2. Jan 2009 18:21

Re: Windows Steuerbereich???
 
Geht's etwas genauer, vielleicht eine kleine Beispielroutine(Hilfe gibt nichts her)?!?

mkinzler 2. Jan 2009 18:24

Re: Windows Steuerbereich???
 
Sorry heisst onCloseQuery. Schau mal im OI nach diesem Event. Die mit dieser Property verknüpfte Methode wird beim klick aufgerufen. In ihr kannst du einen Bestätigungsdialog aufrufen und dann festlegen ob geschlossen wird oder nicht.

AlexanderBrade 2. Jan 2009 18:27

Re: Windows Steuerbereich???
 
Wie schreie ich eine Methode, die ich damit verknüpfen kann?

Ich kann ja im OI nicht z.B. Button1click(der bedeutet auch "Schließen") als Methode auswählen, daher komme ich icht weiter...

mkinzler 2. Jan 2009 18:28

Re: Windows Steuerbereich???
 
Einfach durch Klicken in den Event des Formulars

AlexanderBrade 2. Jan 2009 18:29

Re: Windows Steuerbereich???
 
Sorry, einfach im OI doppelt klicken, danke vielmals...

haentschman 2. Jan 2009 18:31

Re: Windows Steuerbereich???
 
Hallo...

die Procedure OnCloseQuery wird aufgerufen sobald du auf das Kreuz klickst bzw. du auf andere Weise versuchst die Form zu schließen.

Deinen Code einfach da rein.
Beispiel:
Delphi-Quellcode:
if MessageDlg('Möchten Sie wirklich beenden ?',
          mtConfirmation, [mbYes, mbNo], 0) = mrYes then CanClose:= True else CanClose:= False;
ist die Variable CanClose=True wird die Form geschlossen ansonsten nicht.

:hi:

[edit]
:gruebel: zu langsam... zu alt :gruebel:
[/edit]


Alle Zeitangaben in WEZ +1. Es ist jetzt 02: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-2025 by Thomas Breitkreuz