Datei exklusiv öffnen

[marabu]

Hi,

und außerdem musst du etwas mehr auf die Syntax achten:

Delphi-Quellcode:

var
  fs: TFileStream;
begin
  fs := TFileStream.Create(FileName, fmOpenRead, fmShareExclusive);
  // ...
  fs.Free;
end;

Grüße vom marabu