jsGetDirDlg
Use this resizable, configurable dialog for getting a directory name from the user. Why give your user a file open dialog when what you really want is to give him a choose a directory dialog?

type TjsGetDirDlg = class(TComponent)
private
FResizeable : Boolean;
FInitialDir : String;
FPrompt : String;
FWindowCaption : String;
FDirectory : String;
FDirMustExist : Boolean;
protected
{ Protected declarations }
public
constructor Create(AOwner : TComponent); override;
function Execute : Boolean;
published
property Resizeable : Boolean read FResizeable write FResizeable;
property InitialDir: String read FInitialDir write FInitialDir;
property Prompt : String read FPrompt write FPrompt;
property WindowCaption : String read FWindowCaption write
FWindowCaption;
property Directory : String read FDirectory;
property DirMustExist : Boolean read FDirMustExist write FDirMustExist;
end;