Textfile reset mit fmOpenRead -> E/A Fehler 32

[baumina]

Wenn ich eine csv-Datei mit Excel offen habe, schaffe ich es nicht diese mit meinem Delphi ebenfalls nur lesend zu öffnen. Was mache ich falsch?

Delphi-Quellcode:

var
  fFile   : TextFile;

begin
  AssignFile(fFile,lSourceFile);
  FileMode := fmOpenRead;
  reset(fFile); // <- E/A Fehler
  CloseFile(fFile);
  FileMode := fmOpenReadWrite;
end;

[Uwe Raabe]

Ich sehe da zwei Möglichkeiten:

1. Addiere zu dem fmOpenRead noch ein fmShareDenyNone.

2. Excel öffnet die Datei selbst exklusiv, dann hast du keine Chance.

Ich hatte da ein ähnliches Problem mit DXF-Dateien in AutoCAD. Die kann man auch nicht lesen, wenn sie in AutoCAD offen sind.

[baumina]

FileMode := fmOpenRead OR fmShareDenyNone; klappt leider nicht. Auch der Versuch über StringList.LoadFromFile zu gehen hat nicht geklappt.

[Uwe Raabe]

Zitat von baumina:

FileMode := fmOpenRead OR fmShareDenyNone; klappt leider nicht. Auch der Versuch über StringList.LoadFromFile zu gehen hat nicht geklappt.

LoadFromFile macht auch nichts anderes als fmOpenRead. Wenn auch kein anderes Programm (z.B. notepad oder die Vorschau im Windows Explorer) die Datei öffnen kann, dann sieht es schlecht aus.

[baumina]

Zitat von Uwe Raabe:

Wenn auch kein anderes Programm (z.B. notepad oder die Vorschau im Windows Explorer) die Datei öffnen kann, dann sieht es schlecht aus.

Mit Notepad, der Delphi-IDE oder WinVI kann ich die Datei aufmachen, mit WordPad nicht. Demnach muss es da eine Möglichkeit geben.

[Uwe Raabe]

Ich sehe gerade, du benutzt TextFile - das ignoriert das Share-Bit!

Mach statt dessen einen TFileStream mit fmOpenRead OR fmShareDenyNone auf und übergib den dem LoadFromStream einer TStringList .

[baumina]

Danke Uwe, diesen Weg hatte ich mir auch grad überlegt und siehe da, es klappt.

Delphi-Quellcode:

  aStream := TFileStream.Create(lSourceFile,fmOpenRead OR fmShareDenyNone);
  aList := TStringList.Create;
  aList.LoadFromStream(aStream);

[p80286]

Noch ein kleiner Nachtrag aus der OH:

Zitat:

In Delphi legt FileMode den Zugriffsmodus fest, wenn typisierte und nicht typisierte Dateien (keine Textdateien) mit der Prozedur Reset geöffnet werden.

Gruß
K-H

[baumina]

Aber auch schade, dass man der Stringlist beim LoadFromFile keinen Mode mitgeben kann.

[p80286]

Zitat von baumina:

Aber auch schade, dass man der Stringlist beim LoadFromFile keinen Mode mitgeben kann.

ich glaube das ist Standardmäßig RO und ShareDenyNone.

Gruß
K-H