Nochmal SelectDirectory

[Willie1]

https://www.delphipraxis.net/21136-d...zuwaehlen.html

Hallo, hier habe ich eine Variante von SelectDirectory gefunden. Sie hat ein interessantes Detail, sie zeigt oben unter Caption den ausgewählten Ordner an. Das ist bei einem großen Ordnerbaum sehr hilfreich.
Das "offizielle" SelectDirectory von Delphi hat alles, was ich brauche (auch einen Ordner anlegen) aber die oben beschriebene Option fehlt. Übersehe ich da was oder muss ich nach arbeiten?
Gruß Willie.

[Andreas L.]

Ich habe folgende Komponenten installiert:

• Browse4Folder (EmbeddedWB)
• JvBrowseForFolderDialog (Jedi VCL)
• JvSelectDirectory (Jedi VCL)
• KBrowseFolderDialog (KControls von Tomas Krysl)

Keiner dieser Dialoge unterstützt die Anzeige des aktuellen Pfades als Label wie auf deinen Screenshot. Außer JvSelectDirectory können alle Dialoge eine Edit-box anzeigen mit dem aktuellen Ordner: Leider ohne Pfad. Ich habe gerade versucht den Pfad im OnAcceptChange, OnChange und OnShouldShow von JvBrowseForFolderDialog als StatusText, DisplayName oder Title zu setzen. Das geht, aber der Dialog aktualisiert sich nicht. Die Werte sind erst bei erneuten aufrufen zu sehen. Du könntest z. B. von dieser Komponente ableiten und die function lpfnBrowseProc überschreiben. Bei uMsg = BFFM_SELCHANGED könntest du z. B. UpdateStatusText('pfad....'); aufrufen. Oder protected procedure DoSelChanged, etc.

[Bernhard Geyer]

Mit neueren Delphi-Versionen würde man TFileOpenDialog nehmen und die Option fdoPickFolders setzen.
Dann hat das was man in 2019 als Verzeichnisauswahldialog unter Windows erwarten würde und nicht mehr diesen Uraltdialog.

[Willie1]

Hallo Delphianer,

Der OpenFolder Dialog hier aus dem Forum ist gut, wenn er die Möglichkeit böte, einen Ordner an zu legen. Delphi-SelectDirectory fehlt die sehr hilfreiche Anzeige von Laufwerk und Pfad oben (Edit ist kein Ersatz).
Der Vista FileOpenDialog-Komponente fehlt die Eigenschaft IntialDir. Lässt sich das nachbauen?

Ich will eine Datei mit festem Namen (Bildarchiv.dat) kopieren und dazu komfortabel den Zielordner auswählen.
Gruß Willie.

[Bernhard Geyer]

Zitat von Willie1:

Der Vista FileOpenDialog-Komponente fehlt die Eigenschaft IntialDir. Lässt sich das nachbauen?

FileOpenDialog.FileName := <MeinPfad der beim Starten des Dialogs gewählt ist>;

[Willie1]

Danke Bernhard, so klappt es. Willie.