TFileStream.Create - Fehler....

[Sereby]

Hiho,

ich bekomme des öfteren Automatische Bugreports (MadExcept) zugeschickt in denen es um TFileStream.Create geht..
einer dieser Fehler ist z.B. dieser:

Zitat:

exception class : EFOpenError
exception message : Datei F:\Addons\Archive_Files\GnLite-W2k3_x86_04_2009\msxml6.exe kann nicht geöffnet werden. Das System kann den angegebenen Pfad nicht finden.

Das komische daran ist, dass ich versuche die MD5 Summe aus der Datei auszulesen und den Pfad der Datei anfangs durch Findfirst und co. ausgelesen habe also die Datei 100% existiert!
Des weiteren prüfe ich vorher ob die Datei existiert, falls im unwahrscheinlichen fall der user die datei doch ma eben schnell gelöscht haben sollte.
Da FileExist ja True zurück gibt denke ich ja wohl dass alles OK ist..
Die MD5 Unit benutzt einfach folgendes um die datei zu öffnen:

Delphi-Quellcode:

function MD5File(const FileName: string): TMD5Digest;
var
 F: TFileStream;
begin
 F:=TFileStream.Create(FileName, fmOpenRead);
 try
  Result:=MD5Stream(F);
 finally
  F.Free;
 end;
end;

Was bedeutet dieser fehler nun? ich kapier das nich
extra info: das programm hat ein Admin-Manifest läuft also mit Administrator-Rechten

[sx2008]

Könnte sein, dass zu diesem Zeitpunkt ein Virenscanner die Datei geöffnet hat.
Oder der Explorer liest die Datei um das Icon zu extrahieren.
Du solltest das gleichzeitige Lesen der Datei erlauben und entsprechende Share-Flags angeben:
F:=TFileStream.Create(FileName, fmOpenRead or fmShareDenyWrite);