E/A Fehler 32

[juelin]

also habe geändert in fmSharedDenyNone
das andere Programm schreibt nur und ich will nur lesen.
Wie gesagt mit dem Editor geht das ja auch.
BAT-File: dunp1090.exe > daten.txt

[EmWieMichael]

Mit FileMode zu experimentieren wird erfolglos bleiben, da FileMode bei Textdateien keine Auswirkungen hat. Textdateien können nur zum Lesen oder zum Schreiben geöffnet werden.

[dstein]

Evtl. so?
Feedback ob das funktioniert wäre schön.

Quelle
https://docwiki.embarcadero.com/Code...teFile_(Delphi)

if dlgOpenTxtFile_1.Execute() then
begin
try
edt_File.Text := dlgOpenTxtFile_1.FileName;

Mmo1.Lines[0] := TFile.ReadAllText(edt_File.Text); // uses System.IOUtils

except
{ Catch the possible exceptions }
MessageDlg('Incorrect path', mtError, [mbOK], 0);
Exit;
end;
end;

[himitsu]

An der Stelle ist das Exit; natürlich nutzlos, aber egal.

Zitat:

MessageDlg('Incorrect path', mtError, [mbOK], 0);

Aber für sowas gehört man mindestens, von diesem alten Typen grade, total den Popo versohlt bekommen.

Es darf NIEMALS NICHT eine Fehlermmeldung durch einen sinnlosen Text ersetze werden

Es gibt hier garkeinen Grund, für deinen Dialog und das ganze Try-Except kann man ganz weglassen.
Erstmal bekommt man dann wieder eine "ordentliche" Fehlermeldung.

Wenn, dann nimmt man E.Message mit in die Fehlermeldung oder speichert es zumindestens in einem Log.
* Einfach verwerfen ist grob fahrlässig.
* und natürlich kann man auch den Dateinamen nochmal im Log/Fehlermeldung anzeigen

Und wie kommmst auf die Idee, der Pfad könnte inkorrekt sein?
* wie bereits gesagt ist E/A-Fehler 32 = ERROR_SHARING_VIOLATION.
* Ist der OpenFileDialog richtig eingestellt, kann garkein falscher Pfad rauskommen.
* und was ist, wenn der Pfad zwar gültig ist, aber der Pfad oder die Datei genicht existiert oder oder du hast keinen Zugriff (fehlende Leserechte) oder jemand hat die Datei und fehlende SharingRechte oder der Datenträger ist kaputt (Lesefeheler)

* Warum 0 anstatt z.B. mtError?

[dstein]

Moin finde ich auch, aber das ist Original:
https://docwiki.embarcadero.com/Code...teFile_(Delphi)
Vielleicht sollte jemand "embarcadero" einen Tip geben

[hoika]

Hallo,
bitte, tut dir keinen Zwang an...

Hier noch ein Bsp. mit Streams, was funktioniert.
https://www.delphipraxis.net/185425-...hler-32-a.html

Gefunden mit Google "delphi reset error 32"
innerhalb von 2 Minuten.