FAQ - Graphics.How to delete a folder?
Feedback.

Answer: The following is the code deletes a folder recursively.
Example:

Sub deletefolder(f as folderitem)
  dim files(-1) as FolderItem
  
  if f=nil then Return
  
  // delete single file
  if f.Directory=false then
    f.Delete
    Return
  end if
  
  // get a list of all items in that folder
  dim i,c as integer
  c=F.Count
  for i=1 to c
    files.Append f.TrueItem(i)
  next
  
  // delete each item
  for each fo as FolderItem in files
    if fo=nil then
      ' ignore
    elseif fo.Directory then
      deletefolder fo
    else ' file
      fo.Delete
    end if
  next
  
  f.Delete
End Sub