Hallo...
Man nehme einen USB Stick. Wenn ich mit:
Delphi-Quellcode:
class function TSEAMToolsIO.DeleteDirectoryComplete(Name: string): Boolean;
var
sh: SHFileOpStruct;
begin
if TDirectory.Exists(Name) then
begin
ZeroMemory(@sh, SizeOf(sh));
sh.Wnd := Application.Handle;
sh.wFunc := FO_DELETE;
sh.pFrom := PChar(Name +#0);
sh.fFlags := FOF_SILENT or FOF_NOCONFIRMATION;
end;
Result := SHFileOperation(sh) = 0;
end;
den HAUPTORDNER = Root leermachen möchte, dann schreit mich "Sie benötigen Administrator...."
Mit einem anderen USB Stick kann ich problemlos auch den Rootordner leeren...ohne Administrator. Der Rootordner hat alle Rechte für Jeder...
PS: Mit einem Unterorder des Rootordners ist das kein Problem.
Was habe ich übersehen?