AssignFile -> simples prinzip aber ich stolper trotzdem...

**DerTobi**

Hallo zusammen,

mir ist es schon fast peinlich das Problem zu schildern, da a.)es mein erster Post ist und b.) AssignFile eigentlich simpel genug sein sollte.

Bei folgendem Abschnitt schmeisst er mir eine Exception sobald das AssignFile aufgerufen wird. FLogFile ist dabei vom Typ TextFile. Der Pfad der in xLogFile steht ist auch vorhanden. Das ganze auf Windows 7. Sehe ich den Wald vor lauter Bäumen nicht? Vielen Dank schoneinmal fürs Lesen und evtl. wenn jemand eine Lösung hat, dann auch für eben jene

zusammenfalten · markieren

Delphi-Quellcode:

			constructor TFileLogObject.Create;

var xLogFile: String;

begin

  inherited Create;

  xLogFile := GetCurrentDir + '\' + gcLogFileDir + FormatDateTime('yyyy-mm-dd', now) + gcLogFileExtension;

  AssignFile(FLogFile, xLogFile);

  if not FileExists(xLogFile) then

    Rewrite(FLogFile)

  else

    Append(FLogFile);

end;

AssignFile -> simples prinzip aber ich stolper trotzdem...

AssignFile -> simples prinzip aber ich stolper trotzdem...

Forumregeln