Home  |  Delphi .net Home  |  System.IO.Directory  |  GetDirectories Method
GetDirectories  
Method  
Gets the Directories (folders) in the specified Directory
Directory Class
System.IO NameSpace
CF1.  Function GetDirectories ( PathString : String; ) : Array of String;
CF2.  Function GetDirectories ( PathString:StringPathString : String; Filter : String; ) : Array of String; Static;
CF : Methods with this mark are Compact Framework Compatible
Description
The GetDirectories method returns an array of strings that hold the absolute paths of the sub-directories of the specified PathString. Optionally, this list may be limited by the Filter string.
 
The array size is dynamically set by this method.
 
This filter string may contain valid directory name characters, but may not have consecutive . characters. Use * wildcard to represent a sequence of 0 or more characters, and ? to represent a single character.
Notes
Static methods are not methods of an object - they are simply class functions or procedures available at any time.
Microsoft MSDN Links
System.IO
System.IO.Directory
 
 
An example of the 1st syntax
program Project1;
{$APPTYPE CONSOLE}

uses
  System.IO;

var
  BasePath : String;
  Folders  : Array of String;
  i        : Integer;

begin
  // Create a base folder
  BasePath := 'C:\Base';
  System.IO.Directory.CreateDirectory(BasePath);

  // And some sub-folders
  System.IO.Directory.CreateDirectory(BasePath+'\First');
  System.IO.Directory.CreateDirectory(BasePath+'\Second');
  System.IO.Directory.CreateDirectory(BasePath+'\Third');

  // List the folders under C:\Base
  Folders := System.IO.Directory.GetDirectories(BasePath);

  for i := 0 to Length(Folders)-1 do
    Console.WriteLine(Folders[i]);

  // Now delete this nest of folders
  System.IO.Directory.Delete(BasePath, true);

  Console.Readline;
end.
Show full unit code
  C:\Base\First
  C:\Base\Second
  C:\Base\Third
Example of the second syntax
program Project1;
{$APPTYPE CONSOLE}

uses
  System.IO;

var
  BasePath : String;
  Folders  : Array of String;
  i        : Integer;

begin
  // Create a base folder
  BasePath := 'C:\Base';
  System.IO.Directory.CreateDirectory(BasePath);

  // And some sub-folders
  System.IO.Directory.CreateDirectory(BasePath+'\First');
  System.IO.Directory.CreateDirectory(BasePath+'\Second');
  System.IO.Directory.CreateDirectory(BasePath+'\Third');

  // List the folders under C:\Base containing with 'r'
  Folders := System.IO.Directory.GetDirectories(BasePath, '*r*');

  for i := 0 to Length(Folders)-1 do
    Console.WriteLine(Folders[i]);

  // Now delete this nest of folders
  System.IO.Directory.Delete(BasePath, true);

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