Vom Windows Explorer. Versuche mal folgendes: lösche einen Unterordner mit der Hand und versuche anschließend den übergeordneten Ordner - der jetzt leer sein sollte - auch mit der Hand zu löschen. Die Fehlermeldung sollte der ähneln, die dein Programm hier liefert:
Delphi-Quellcode:
if not RemoveDir(dir) then
ShowMessage(SysErrorMessage(GetLastError));
marabu