delphi - 使用 Delphi 创建文件夹选择对话框的最常见方法是什么？

Question

尽管通过 TOpenDialog 提供了文件选择对话框，但 Delphi 2009 中似乎没有一个简单的组件可用于创建文件夹选择对话框。

使用 Delphi 创建现代文件夹选择对话框的最常见方法是什么？

Answer 1

FileCtrl.pas 中有两个重载例程，称为 SelectDirectory

要获得现代外观，请使用第二种形式，即 sdNewUI

var
  dir : string;
begin
  dir := 'C:\temp';
  FileCtrl.SelectDirectory('Select', 'C:\', dir, [sdNewFolder, sdNewUI], Self);
end;

注意:sdNewFolder、sdNewUI 等仅在 D2006+ 中可用