Zitat von
BAMatze:
Delphi-Quellcode:
procedure TLoaderForm.FormClose(Sender: TObject; var Action: TCloseAction);
var i: Integer;
begin
// Wenn Form geschlossen wird, ausblenden und "Self.Free" machen
for i := 230 downto 0 do
begin
LoaderForm.AlphaBlendValue := i;
Application.ProcessMessages;
end;
Action := caFree;
end;
Mich würde da was ganz großes stören, nämlich die Verwendung von exakten Variablennamen (
LoaderForm.). Der andere Punkt ist, dass du hier schreibst, dass das Formular durch den aufruf von Self.Free terminiert wird.
An anderer Stelle schreibst du:
Zitat von
BAMatze:
[delphi]
// Splashscreen schließen
LoaderForm.Close;
LoaderForm.Free;
So, jetzt ist das Objekt doch 2x aus dem Speicher entfernt worden, oder? (hab die Delphi-
VCL-Quelltexte noch nicht konsultiert) Aber dennoch müsste hier ein Fehler vorliegen.
Bernhard