Datei kann nicht gelöscht werden

**Mysterio08**

Guten Morgen,
ich habe ein sehr triviales Problem, bin gerade aber nicht in der Lage, es selber zu lösen...
Und zwar erstelle ich eine Datei, in der ein FileStream gespeichert wird. Mit ExtractFilePath(ParamStr(0)) bestimme ich das Verzeichnis und speichere es in eine Variable, die Datei wird folgedem auch an dem Ort abgespeichert, in dem ich das möchte.
Da es ein FileStream ist, gibt es ja Probleme, wenn nichts abgespeichert wurde, deswegen prüfe ich, die Dateigröße und möchte die Datei ggf. löschen. Der Code dazu sieht wie folgt aus:

markieren

Delphi-Quellcode:

			  Verzeichnis := ExtractFilePath(ParamStr(0)) + 'Data.fs';

  if Stream.Size = 0 then DeleteFile(Verzeichnis)

Das klappt nun aber nicht und ich weiß nicht, wieso.
mfg.

Datei kann nicht gelöscht werden

Datei kann nicht gelöscht werden

Forumregeln