Home  |  Delphi .net Home  |  System.IO.DirectoryInfo  |  Delete Method
Delete  
Method  
Delete the directory (folder) and optionally its sub-directories
DirectoryInfo Class
System.IO NameSpace
CF1.  Procedure Delete ( Recursive : Boolean; ) ;
CF : Methods with this mark are Compact Framework Compatible
Description
If the current Directory exists, it is deleted. The delete will fail if the directory is not empty, unless the Recursive parameter is true, when all sub-directories are deleted first.
Notes
An exception is thrown if the delete is not recursive and sub-directories are found.
Microsoft MSDN Links
System.IO
System.IO.DirectoryInfo
 
 
Creating and deleting a nest of folders
program Project1;
{$APPTYPE CONSOLE}

uses
  System.IO;

var
  DirInfo   : System.IO.DirectoryInfo;
  Base      : String;
  SubFolder : String;

begin
  Base      := 'C:\Base';
  SubFolder := 'SubFolder';

  // Create a DirectoryInfo object for this Base folder
  DirInfo := System.IO.DirectoryInfo.Create(Base);

  // Create the Base folder
  DirInfo.&Create;

  // And create a sub folder
  DirInfo.CreateSubdirectory(SubFolder);

  if System.IO.Directory.Exists(Base)
  then Console.WriteLine('{0} now exists', Base)
  else Console.WriteLine('{0} does not exist', Base);

  // Now delete this nest of folders
  DirInfo.Delete(true);

  if System.IO.Directory.Exists(Base)
  then Console.WriteLine('{0} still exists', Base)
  else Console.WriteLine('{0} deleted OK', Base);

  Console.Readline;
end.
Show full unit code
  C:\Base now exists
  C:\Base deleted OK
 
 
Delphi Programming © Neil Moffatt All rights reserved.  |  Contact the author