Hallo Matze,
Zitat von
Matze:
Das geht irgendwie nicht, was muss ich denn genau anstelle von aFlags schreiben? In sakuras Post finde ich darüber nichts.
Abgesehen vom Flags/aFlags-Problem, das Dir Chris gelöst hat, funktioniert Sakuras Lösung einwandfrei:
Delphi-Quellcode:
...
end; // target not available
fFlags := Flags // statt aFlags;
...
Aufruf (aus Sakuras Post)
Code:
DoFileWork(Self.Handle, FO_DELETE, strlFiles, nil, [b][color=red]FOF_ALLOWUNDO[/color][/b]);
Mögliche Parameter für Flag (aus Sakuras Post)
Zitat:
aFlags - mögliche Flags zur Verarbeitung
FOF_ALLOWUNDO - Ermöglicht eine Umkehrung der letzten Operation
FOF_FILESONLY - Verzeichnisse ignorieren
FOF_MULTIDESTFILES - aTo hat einen Eintrag für jeden Eintrag in der aFrom Liste
FOF_NOCONFIRMATION - Der User muss keine Bestätigung zum Überschreiben, etc. geben
FOF_NOERRORUI - Fehlermeldugen unterdrücken
FOF_NORECURSION - Unterverzeichnisse ignorieren
FOF_RENAMEONCOLLISION - Datei umbenennen, wenn diese bereits im Zielverzeichnis existiert (Kopie 1 von ...)
FOF_SILENT - Fortschrittsanzeige unterdrücken.