Datei öffnen, die von einem anderen Prozess benutzt wird

[oki]

Hallo Leute,

trotz Suche bin ich nicht weiter. Ich will eine Datei öffnen, in die ein anderes Programm Daten schreibt um diese sofort (während der Messung) zu lesen. Jetzt bekomme ich immer die Meldung, dass die Datei nicht geöffnet werden kann, da sie von einem anderen Prozess verwendet wird.

Ich versuche die Datei so zu öffnen:

Delphi-Quellcode:

procedure TLTC2440_DataList.LoadData(AFileName: String);
var AFStream : TFileStream;
    ASStream : TStringStream;
begin
  FFileName := AFileName;
  Clear;

  if not FileExists(AFileName) then
    Exit;
  FFileText := TStringList.Create;
  AFStream := TFileStream.Create(AFileName, fmOpenRead, fmShareDenyNone);
  try
    ASStream := TStringStream.Create;
    try
      ASStream.LoadFromStream(AFStream);
      FFileText.Text := ASStream.DataString;
    finally
      FreeAndNil(ASStream);
    end;
  finally
    FreeAndNil(AFStream);
  end;
  try
    DecodeHeaderfromFile(FFileText);
    DecodeValues(FFileText);
  finally
    FreeAndNil(FFileText);
  end;
end;

Vorher hatte ich es erst nur über die TStringList mit LoadfromFile versucht. Kein Erfolg. Wenn ich die Datei mit dem Windows-Editor öffne gibt es keine Fehlermeldung. Also mache ich was falsch. Die Frage ist nur was?

Ich hoffe auf eure Hilfe,

Gruß oki