Form: OnClose Ereignis nutzen

[Gambit]

Moin!

Ich weiß nicht genau, ob dieses Thema hier hin gehört aber ich möchte gerne wissen, in wie weit ich mir das OnClose Ereignis einer Form zu nutze machen kann. Es geht mir nur darum, wie ich es hinbekomme, dass ich, wenn ich auf das X oben rechts der Form klicke, ich noch eine Abfrage o.ä bekommen kann.

Gruß

Gambit

[Daniel B]

HAllo,

ja, dafür kannst Du es benutzen.
Wenn Du Deine Anwendung mit Close; beendest, dann nimm lieber die OnClose-Prozedur, beendest Du aber mit App.Terminate;, dann lieber OnDestroy.
Weiteres hierzu:
http://www.delphipraxis.net/viewtopic.php?t=200

Grüsse, Daniel

[sakura]

Das OnClose ist dafür nicht geeignet, aber es gibt das OnCanClose Ereignis, welches geradezu perfekt dafür ist. Wenn Du das Schließen des Forms verhindern willst, musst Du einfach die Variable CanClose auf False setzen.

......

[Gambit]

Hmm, Danke. So ganz klar ist mir jetzt aber doch noch nicht, wie ich dann eine Abfrage(zB. dieses dusselige 'Wollen Sie wirklich...?') implementieren kann.

Gambit

[Christian Seehase]

Moin Gambit,

das geht am Bestem im OnCloseQuery Ereignis (das sakura meinte)
Schau's Dir doch mal an.

@Daniel B:
OnClose/OnDestroy wären schon zu spät.

[Gambit]

OK, aber ich kann in dem Ereignis OnCloseQuery nichts eintragen. Wie müsste denn der Procedurkopf aussehen, damit ich das in das Ereignis eintragen kann?

Gambit

[Blacklotus]

Ich vermute mal du braucht sowas in der Art:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if MessageDlg('Programm wirklich beenden?',
mtConfirmation, [mbYes, mbNo], 0) = mrNo then
Canclose := false;
end;

[Christian Seehase]

Moin Gambit,

wie Du kannst Da nichts eintragen?
Im Objektinspektor\Ereignisse einen Doppelclick auf OnCloseQuery und den Code eintragen geht nicht?

[Gambit]

Aha, jetzt hab ichs, Danke!!

Gambit