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:
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.