Select Directory
Egy könyvtárat választhat ki az user a lenti példa segitségével, szebb, és jobb, mint a DirectoryListBox.
uses Filectrl procedure TForm1.Button1Click(Sender: TObject); var Dir : String; begin SelectDirectory('Select a directory','',Dir); ShowMessage(Dir); end;