Possible Duplicate:
Delphi: Selecting a directory with TOpenDialog
我需要打开项目中的特定文件夹。当我使用opendialog1时，我只能打开一个文件。打开一个文件夹怎么样？
PS:我使用Delphi 2010
最佳答案
在 Vista 及更高版本上，您可以使用 IFileOpenDialog 显示更现代的对话框。
var
OpenDialog: TFileOpenDialog;
SelectedFolder: string;
.....
OpenDialog := TFileOpenDialog.Create(MainForm);
try
OpenDialog.Options := OpenDialog.Options + [fdoPickFolders];
if not OpenDialog.Execute then
Abort;
SelectedFolder := OpenDialog.FileName;
finally
OpenDialog.Free;
end;
看起来像这样:
关于DELPHI - 如何使用 opendialog1 选择文件夹？，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/9527762/