the following code will bring up the standard “Browse for folders” dialog with
the full directory tree available:
[code lang=”delphi”]uses
FileCtrl;
procedure TForm1.Button1Click(Sender: TObject);
var
directory: string;
begin
SelectDirectory(‘Select A Directory’, ”, directory);
end;
[/code]
[tags]Delphi, File[/tags]
0 Kommentare zu “Choose a Directory”