function SelectDirectory(const Caption: string; const Root: WideString; out Directory: string): Boolean; overload;


function SelectDirectory(var Directory: string; Options: TSelectDirOpts; HelpCtx: Longint): Boolean; overload;


有两个，一个是Delphi自己写的，一个是调用Windows的