ordner und unterordner (nicht unbedingt leer) löschen

[teebee]

Warum so kompliziert und fehleranfällig? Luckie hat doch schon die Lösung gepostet.

Delphi-Quellcode:

Uses ShellApi;

Var shfop: TSHFILEOPSTRUCT;

  ZeroMemory(@shfop,sizeof(shfop));
  shfop.pFrom := PChar(FolderToDelete+#0); // doppelte Null am Ende
  shfop.fFlags := FOF_SILENT Or FOF_NOCONFIRMATION;
  shfop.wFunc := FO_DELETE;
  SHFileOperation(shfop);