Auf Dateien zugreifen die gerade in Gebracuh sind (?)

[runner]

ich habs zwar nicht getestet, aber wenn Du die Datei nur kopieren willst müsste das auch so gehen:

Delphi-Quellcode:

procedure LoadFromFileEX(const FileName, NewFile: string);
var
  Stream: TStream;
  StrBuf: TStrings;
begin
  StrBuf := TStringList.Create;
  Stream := TFileStream.Create(FileName, fmOpenRead or fmShareDenyNone);
  try
    StrBuf.LoadFromStream(Stream);
    StrBuf.SaveToFile(NewFile);
  finally
    Stream.Free;
    StrBuf.Free;
  end;
end;