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