Forum: Programmieren allgemein
by Der schöne Günther,
2. Dez 2013
Stimmt, hatte ich überlesen :oops:
Vielleicht ist die nächste Gruppenumarmung auch wieder überfällig :sharkylinchen:
Forum: Programmieren allgemein
by Der schöne Günther,
2. Dez 2013
Als weiteren Vorschlag würde ich die Prüfung mit dem "Großer Gott, WIRKLICH SCHLIEßEN !?!?!"-Dialog und dem Abschlussdialog ("Es wurden X Crêpes verkauft") in eigene Methoden auslagern, so dass es ungefähr so aussieht:
procedure TForm4.Button1Click(Sender: TObject);
begin
self.Close();
end;
procedure TForm4.FormClose(Sender: TObject; var Action: TCloseAction);
begin...
Forum: Programmieren allgemein
by Der schöne Günther,
2. Dez 2013
Zeig bitte nochmal deinen Quelltext wie er jetzt ist. Sowohl das OnCloseQuery-Event als auch das, was beim Druck auf deinen Button passiert.