Hallo,
Ich kopiere mit der unteren Funktion Dateien, Wenn ich jetzt eine Datei kopiere, dessen Zielverzeichnis nicht existiert werde ich gefragt, ob ich es erstellen möchte. Er soll es aber einfach erstellen, ohne zu fragen, wie mache ich das?
Eigentlich sollte doch "FOF_NOCONFIRMATION" diese Meldung unterdrücken, oder!?
Delphi-Quellcode:
function CopyFileEx(const ASource, ADest: String): boolean;
var sh : TSHFileOpStruct;
begin
sh.Wnd := Application.Handle;
sh.wFunc := FO_COPY;
// String muss mit #0#0 Terminiert werden, um das Listenende zu setzen
sh.pFrom := PChar(ASource + #0);
sh.pTo := PChar(ADest + #0);
sh.fFlags := FOF_NOCONFIRMATION or FOF_MULTIDESTFILES;
Result:=ShFileOperation(sh)=0;
end;
Danke
Genieße jede Minute deines Lebens, denn sie wird nicht wieder kommen.