Hossa das ging fix
Oh peinlich, wird sofort nachgereicht.
Exception ist eine EAccessViolation. Eigentlich ein klarer Indikator aber mir wills einfach nicht aufgehen.
Deklaration sieht wie folgt aus:
Delphi-Quellcode:
TFileLogObject = Class(TObject)
private
FLogFile: TextFile;
function FormatTimeStampForLog: String;
public
constructor Create;overload;
destructor Destroy;override;
procedure AddLogEntry(aMessage: String);
end;
Der Einzelschritt sagt mir es knallt beim AssignFile. Mich wundert es ja auch das es da knallt. Es wird ja nur der
Handle erzeugt. Wenn der
Handle ins nichts zeigt beim aufruf Ok aber so? Wie gesagt, ich übersehe bestimmt wieder mal eine popelige Kleinigkeit.
Das TFileLogObject wird in einer Get Methode des Globalen Log Objects instantiiert(bei bedarf).