Forum: Object-Pascal / Delphi-Language
Delphi
by Sir Rufo,
6. Feb 2011
:shock: nur weil man etwas nicht versteht muss es nicht schlecht sein
Forum: Object-Pascal / Delphi-Language
Delphi
by Sir Rufo,
6. Feb 2011
CloseFile würde immer ausgeführt werden.
Wird aber vorher kein Append oder Reset oder Rewrite ausgeführt, dann rummst es.
Das ist genau so wie man das nicht macht:
try
Foo := TFoo.Create;
...
finally
Foo.Free;
end;
Forum: Object-Pascal / Delphi-Language
Delphi
by Sir Rufo,
6. Feb 2011
Das try ist zu früh
AssignFile(f, 'C:\test.txt');
// try <-- hier zu früh
if FileExists('C:\test.txt') then
Append(f)
else
Rewrite(f);
try // <-- da muss es hin
Writeln(f, report);
Forum: Object-Pascal / Delphi-Language
Delphi
by Sir Rufo,
6. Feb 2011
Ein Blick in die Hilfe verrät dir warum Append