Pues otro más para la colección:
Código Delphi
[-]
uses ShellApi;
procedure RemoveFolder(Folder: String);
var
FileInfo: TShFileOpStruct;
begin
FileInfo.Wnd := 0;
FileInfo.wFunc := FO_DELETE;
FileInfo.pFrom := PChar(Folder);
FileInfo.pTo := nil;
FileInfo.fFlags := FOF_NOERRORUI or FOF_NOCONFIRMATION;
ShFileOperation(FileInfo);
end;
// Saludos