Delphi-PRAXiS - Delphi "Ordner erstellen?" unterdrücken

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)

- - Delphi "Ordner erstellen?" unterdrücken (https://www.delphipraxis.net/36594-ordner-erstellen-unterdruecken.html)

"Ordner erstellen?" unterdrücken

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

Re: "Ordner erstellen?" unterdrücken

Zitat:

Zitat von Patrick

Eigentlich sollte doch "FOF_NOCONFIRMATION" diese Meldung unterdrücken, oder!?

Nein, um Dich zu quälen hat MS noch den Wert FOF_NOCONFIRMMKDIR definiert :zwinker:

...:cat:...

Re: "Ordner erstellen?" unterdrücken

Na toll...
Aber vielen Dank! :thumb: