i have been using the following code to empty the folder then delete it thorough program
Erase (Addbs(lcDir) + laDirList(lnI, 1) + "\*.*")
Rd (Addbs(lcDir) + laDirList(lnI, 1))
I has been working fine on all operating system.
I have a new machine with OS Windows8 and it crashes when come to remove directory.
and the error says
The directory is not empty.