DELPHI - How to use opendialog1 for choosing a folder?

delphi directory delphi-2010 opendialog
Galvion picture Galvion · Mar 2, 2012 · Viewed 34.2k times · Source

Possible Duplicate:
Delphi: Selecting a directory with TOpenDialog

I need to open a specific folder on my project. When I use opendialog1, I can only open a file. How about opening a folder ?

wanted - open folder dialog in Delphi

PS : I use Delphi 2010

Answer

David Heffernan picture David Heffernan · Mar 2, 2012

On Vista and up you can show a more modern looking dialog using TFileOpenDialog.

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;

which looks like this:

enter image description here

Related questions

Return the root directory of Delphi executable

I have a Delphi application executing and when I call GetCurrentDir the following returns: C:\dev\w32\2015\BCSLBDemo\Win32\Debug When I call ExtractFileDir(GetCurrentDir()) I receive the following: C:\dev\w32\2015\BCSLBDemo\Win32 What I desire is C:\dev\…

Read More
The application was unable to start correctly (0xc000007b)

I have a client/server app which I have been developing on a single PC. Now it needs two serial ports, so I borrowed a PC from a friend. When I build my app and try to run or debug …

Read More
Indentation shortcuts in Visual Studio

I'm new to Visual Studio 2010 and C#. How can I indent the selected text to left/right by using shortcuts? In the Delphi IDE the equivalents are Ctrl+Shift+I and Ctrl+Shift+U

Read More