@ Ultimator : Ohh nein nicht schon wieder.
Ich les die Strings ja nicht ein -.-
Ich will doch nur so viele TDatei's erstellen wie die Datei Zeilen hat.
Das wurde aber schon
hier geklärt
@ Spider : Dadran dürfte es aber normalerweise nicht liegen...
Außerdem wenn ich ins OnClose das schreibe :
Delphi-Quellcode:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var i : Integer;
begin
for i := 1 to Length(Datei) do
Datei[i].Free;
end;
bekomm ich ne Fehlermeldung "Ungültige Zeigeroperation" beim Beenden.
