TStringList.SaveToFile ERROR_NOT_SUPPORTED

[ralfschwalbe]

Ja, meine Vermutung. Aber welches... Und warum ERROR_NOT_SUPPORTED und nicht einfach ERROR_ACCESS_DENIED?

[Luckie]

Hat das Windows Update eventuell einen benötigten Dienst deaktiviert? Vielleicht mal in diese Richtung forschen?

[Rolf Frei]

Versuch doch auch mal diese Datei mit dem selben Namen via Notepad zu speichern. Bekommst du da auch einen Fehler?

[Luckie]

Oder mit dem Explorer dort eine Datei zu erstellen. Funktioniert das auch nicht, dürfte es sich um ein generelles Problem handeln.

[rwalper]

Ich hatte vor 2 Jahren das gleiche Problem bei nur einem einzigen Kunden. Da hat wirklich die Angabe des Sharemodes geholfen,
beim Lesen
TStream.Create(FileName, fmOpenRead or fmShareDenyWrite) und beim Schreiben
TStream.Create(FileName, fmCreate or fmShareExclusive) bzw. TStream.Create(FileName, fmOpenWrite or fmShareExclusive)

[squetk]

Wir haben hier mit dem gleichen Problem zu kämpfen: Schreibende Zugriffe auf ein Netzwerklaufwerk bringen den Fehler ERROR_NOT_SUPPORTED, wenn sie eine bestehende Datei erweitern wollen.
Und das erst seit Dezember 2019.
Tragisch für unsere Kunden ist dass es auch Software betrifft, die nicht von uns erstellt wurde.

[luka]

Ich werfe einmal den Begriff Manipulationsschutz ein.
Versuche mal diesen abzuschalten, funktioniert danach der Zugriff wieder.

Neue Dateien können erstellt werden, aber diese können dann nicht mehr verändert werden.
Mit dem Editor kann die Datei verändert werden.

[himitsu]

Wir haben auch grade den ersten Kunden.

Nur bei einem von mehreren Rechnern taucht dieser Fehler auf.
Ist bei euch auch Windows 7 der zugreifende Client?

Ja, ich weiß dass Win7 seit Januar offiziell tot ist, aber dann wäre die Lösung ein Upgrade.

[squetk]

Nein, es betrifft auch PC's mit Windows 10.

[ralfschwalbe]

Zitat von rwalper:

Ich hatte vor 2 Jahren das gleiche Problem bei nur einem einzigen Kunden. Da hat wirklich die Angabe des Sharemodes geholfen,
beim Lesen
TStream.Create(FileName, fmOpenRead or fmShareDenyWrite) und beim Schreiben
TStream.Create(FileName, fmCreate or fmShareExclusive) bzw. TStream.Create(FileName, fmOpenWrite or fmShareExclusive)

Funktioniert tatsächlich! Allerdings ist das Problem, dass Delphi in TStrings.SaveToFile auch nur

Delphi-Quellcode:

Stream := TFileStream.Create(FileName, fmCreate);
  try
    SaveToStream(Stream, Encoding);
  finally
    Stream.Free;
  end;

macht... Also was tun? Alle Stringlisten "SaveToFile" mit eigener Speicherroutine versehen? Is blöd...