I wrote a procedure which goes something like the following
MyDeleteDirectory(Dirname)
GetDirList (using FindFirst, FindNext etc.)
for each dir entry
if File then deletefile
else if Directory then MyDeleteDirectory
DeleteDir(Dirname)
Note: Don't delete . or .. because you will recursively delete parent
directories as well.
> -----Original Message-----
> From: gajo [mailto:[EMAIL PROTECTED]]
> Sent: Saturday, 21 January 1995 06:58
> To: Multiple recipients of list delphi
> Subject: [DUG]: Delete *.*
>
>
> How can I delete all files and subdirectories in a directory? Sort of
> like deltree in MS-DOS. If you don't know the answer to this, then I
> would be happy by just knowing how to do a del *.* (delete
> all files in
> a dir) in Delphi 3.
>
> Thanks, Gajo
>
> --------------------------------------------------------------
> -------------
> New Zealand Delphi Users group - Delphi List -
> [EMAIL PROTECTED]
> Website: http://www.delphi.org.nz
>
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
