Wie wird ein Fenster geschlossen?

[Khabarakh]

Zu Terminate:
Gut, es handelt sich also nicht um das Haupt-Formular .
Aber falls es so wäre, ist dann Terminate nicht die schnellste Lösung, wenn man die EventHandler auslassen will? Oder gibt es noch andere Nachteile?

Zu nil:
Schnell eine eigene Prozedur

Delphi-Quellcode:

procedure TMyForm.CloseWithoutPrompt;
begin
  OnClose{Query} := nil;
  Close;
end;

und mit Strg + R durch den Code gehen hätte es auch getan, aber Luckies Lösung ist wahrscheinlich doch die beste.

[Marphy]

Hallo zusammen,

@Sidorion:
Danke für deinen Lösungsvorschlag! Ich habe das Ganze zum Testen leicht modifiziert in eine kleine Demo gepackt (Anhang) und es funktioniert einwandfrei... Der Aufwand ist zwar nicht gleich 0, hält sich aber im Rahmen.
Falls jemand eine bessere/einfachere Lösung parat hat, bitte posten!!

@Luckie:
Das hat Sid ja im Großen und Ganzen schon gepostet In der Demo sind beide Varianten kombiniert.

@Sebastian:
Und was ist, wenn ich das Fenster dann wieder über Show() einblende und es über die Titelleiste schließe? Und drück dich nicht vor der anderen Frage!

Gruß, Marco

[Khabarakh]

Zitat von Marphy:

Und was ist, wenn ich das Fenster dann wieder über Show() einblende und es über die Titelleiste schließe?

Hast ja Recht, ich war in Gedanken noch immer bei der MainForm . Man könnte natürlich den Wert von OnClose speichern und nach Close (ohne Klammern, wir sind doch nicht in C ) wieder zuweisen, aber Luckies und Sidorions Lösung ist ja sowieso die beste.

Zur dieser gewissen anderen Frage:
Der Umfang hat sich inzwischen verdoppelt, die Entwicklungszeit steigt dazu proportional . Der Code ist zu etwa 70% fertig, es fehlen noch ein Demo-Programm und wenigstens etwas Dokumentation. Jetzt aber genug mit OT .

[DevilsCamp]

Eine andere Möglichkeit wäre folgende:

Wenn man auf das X klickt, wird, soweit ich mich nicht irre, eine System-Botschaft an das Fenster geschickt (die nicht kommt, wenn man Close() aufruft).

Also einfach die Botschaften-Behandlung abfangen (WndProc oder so ähnlich) und bei der Botschaft den entsprechenden Code ausführen.

[Marphy]

Hallo zusammen:

@Marc:
An sowas habe ich auch schon gedacht... Ist aber um einiges aufwändiger. Andererseits könnte man z.B. auch ermitteln, ob Windows versucht, die Anwendung zu beenden, weil der PC heruntergefahren wird.

@Sebastian:
Na, was hab ich dir gesagt? Wie gesagt, schreib mir, wenn das Teil fertig ist!

Gruß, Marco