Einzelnen Beitrag anzeigen

Pentium 80486
(Gast)

n/a Beiträge
 
#1

NTFS - Dateiberechtigungen übernehmen

  Alt 29. Mai 2012, 19:47
Hallo,

derzeit verwende ich, da es die für meine Zwecke schnellste Methode ist, SHFileOpStruc, um Dateien zu kopieren.
Leider gehen dabei die Werte der Sicherheitsattribute verloren.

Der Code ist kein Geheimnis und Standard:
Delphi-Quellcode:
function copyFileEx(const aSourceFile, aDestFile: string): Boolean;
var
 fos: TSHFileOpStruct;
begin
 ZeroMemory(@fos, SizeOf(fos));

 with fos do
  begin
   wFunc := FO_COPY;
   fFlags := FOF_NO_UI;
   pFrom := PChar(aSourceFile + #0);
   pTo := PChar(aDestFile)
  end;

 Result := (0 = SHFileOperation(fos));
end;

Wie genau muss ich eine Datei kopieren, damit auch die Sicherheitsattribute und dessen eingestellten Werte übertragen werden?

Geändert von Pentium 80486 (29. Mai 2012 um 19:58 Uhr)
  Mit Zitat antworten Zitat