wie sicher ist diese procedure?

[tn249]

hi,

ich arbeit momentan an einem ( für meine verhältnisse ) größerem projekt und hab darin auch die ansätze eines eigenen debugsystems verankert

ein teil davon ist die folgende procedure;

Delphi-Quellcode:

procedure Log(Text: string);
var
  LogFile: TextFile;
  TDTempStr: string;
begin
  DateTimeToString(TDTempStr, 'dd.mm.yyyy hh:nn:ss', Now());
  TDTempStr := TDTempStr + ': ' + Text;
  AssignFile(LogFile, 'Data/Log.txt');
  Append(LogFile);
  Writeln(LogFile, TDTempStr);
  Flush(LogFile);
  CloseFile(LogFile);
end;

die procedure soll einfach nur markante erledigte aufgaben dokumentieren, mit timestamp


ich habe gesehen das viele von euch mit try..expect / finally arbeiten und würde gerne wissen wann ihr das macht um welche fehler genau abzufangen und wie ihr die obere procedure ändern würdet?

Vielen Dank im voraus
MfG
tn_der_pate