目录选择对话框

众所周知在Delphi里选择目录对话框的函数一个很难看另一个很不方便,于是我做的一个目录选对话框的控件,用了一个API函数,这样又美观而使用方便,源代码也在其中,并附带了一个例子。 支持打开对话框显示初始目录。 支持简略显示选中的目录名。