Ok, dann so:
Delphi-Quellcode:
frmTest := TfrmTest.Create(Application);
try
frmTest.ShowModal;
finally
//was nun?
frmTest.Release;
frmtest := nil;
//oder
FreeAndNil(frmTest);
end;
Ich seh immer noch nicht so richtig den Unterschied, außer dass Release nicht wartet bis dass zu entfernende Fenster fertig mit allen Botschaften ist. Was passiert, wenn ich Release verwende um beim Beenden des Programmes die Unterfenster zu schließen? Das Release fängt an das Unterfenster zu entfernen und gibt die Kontrolle noch bevor es fertig ist wieder zurück an das Hauptprogramm. Dieses schließt sich nun selber. Was aber, wenn das Release des Unterfensters länger als das Beenden des Programmes dauert?
Theoretisches Beispiel:
Delphi-Quellcode:
frmTest := TfrmTest.Create(Application);
try
frmTest.ShowModal;
finally
//was nun?
frmTest.Release; //dauert 5 Sekunden - warum auch immer, aber laut Hilfe: Release gibt die Steuerung sofort an die aufrufende Routine zurück und wartet nicht, bis das Formular freigegeben wird.
//Alles ab hier wird also ausgeführt bevor frmTest.Release überhaupt fertig ist.
frmtest := nil;
end;
Close; //Programm selber beenden - was aber wenn frmTest.Release noch läuft?
@Muetze: meinst du das so?
Delphi-Quellcode:
procedure TfrmTest.FormDestroy(Sender: TObject);
begin
Self := nil; //so?
end;