Диалог "Открыть папку"

[artsb]

Подскажите как открыть диалог выбора папки. Не TOpenDialog, а там маленькое окошко с деревом каталагов, как у винампа(рисунок). Желательно, чтобы можно было создавать новую папку с помощью него. Ну и расскажите пожалуйста как с ним работать.
Среди стандартных не нашёл (может плохо искал ).
Спасибо.

[Джон]

Как именно в Borland это сделать - не знаю. Я его не практикую. А под виндой этим диалогом заведует библиотека shell32, в этом направлении и копай. Ф-я называется SHBrowseForFolder

[Arct]

Еще вот такая API функция есть...

Код:

#include <FileCtrl.hpp>
...
if( SelectDirectory("Текст подсказки над окном" , "Caption_string" , FolderIn))
                {
                LabeledEdit1->Text=FolderIn;
                }

[artsb]

Arct спасибо. То, что нужно. А ты не знаешь как добавить поле и кнопку для создания новой папки. И ещё, для чего в SelectDirectory второй параметр?

[Джон]

SelectDirectory - ф-я АПИ? Нету такой. Эт наверняка борландовские штучки. Незря же FileCtrl.hpp используется.

artsb, Caption - это типа название окна. Обычно у окон сообщений есть два рараметра - caption и prompt. Первый - название окна, второй - непосредственно сообщение.

[artsb]

Понятно. Так как на счёт кнопки "Создать папку"?
Помогите пожалуйста. Очень надо срочно.

[RXL]

artsb, если у тебя установлены хелпы (а они должны быть), то поставь курсор на SelectDirectory и нажми F1 - там подробно рассказано, какие есть свойства и методы и, наверняка, есть пара примеров.

[artsb]

RXL скорее всего с помощью SelectDirectory не получится так сделать. На многих форумах читал по этой теме, но там для Delphi.
Может есть другой способ вызвать этот диалог и чтобы там была кнопка "Создать"?

[RXL]

artsb, и Delphi и BC используют одни и те же библиотеки: VCL или более новую CLX. Т.е. перенос исходников с D в BC возможен, с учетом разницы синтаксиса.

[Джон]

artsb, ты наверняка можешь в билдере работать с системными библиотеками. Вызови ф-ю, про которую я говорил из sdhell32 и будет тебе счастье.

[zubr]

Джон, это клинический случай, я ему на другом форуме пример использования функции SHBrowseForFolder выкладывал  - бесполезно.

[artsb]

Если использовать SHBrowseForFolder, то появляется не то окно, которое мне нужно и которое представлено на рисунке. Я пробовал использовать компонент из RxLib, который основан на SHBrowseForFolder. Там есть два вида: один как на рисунке (без кнопки создать), а другой, тот который не нужен.

[Джон]

Да уж случай действительно клинический...

Подскажите как открыть диалог выбора папки.

маленькое окошко с деревом каталагов

Желательно, чтобы можно было создавать новую папку с помощью него.

А теперь постарайся пожалуйста предельно точно указать какой именно из этих пунктов в SHBrowseForFolder у тебя "не то"? Вот что у меня получается

"И тяжёлая, и дыра есть" (с) А.П. Чехов "Злоумышленник"

[zubr]

artsb, все что тебе надо - это поиграться флагами структуры BROWSEINFO. Уже давно открыл бы MSDN - вопрос был бы решен в течение 2 минут. Для формы, которую отобразил Джон, надо BrowseInfo.ulFlags = BIF_EDITBOX | 0x0040;

[artsb]

Всё получилось. Помогли на другом форуме. Появляется такое же окно на скрине Джон'а.
Подключил shlobj.h
В обработчике нажатия кнопки написал:
    char FileName[MAX_PATH+1];
    BROWSEINFO bi;
    memcpy(FileName, "C:\\", 3);
    bi.hwndOwner = 0;
    bi.pidlRoot = NULL;
    bi.pszDisplayName = FileName;
    bi.lpszTitle = "Заголовок";
    bi.ulFlags = BIF_STATUSTEXT
              |BIF_BROWSEFORCOMPUTER
              |BIF_EDITBOX
              |BIF_NEWDIALOGSTYLE
              /*|BIF_NONEWFOLDERBUTTON*/
              |BIF_USENEWUI;
              //|BIF_BROWSEINCLUDEFILES;
    bi.lpfn = NULL;
    SHGetPathFromIDList(SHBrowseForFolder(&bi),FileName);
    Edit1->Text=FileName;

При запуске приложения вылетали ошибки:
  [C++ Error] shobjidl.h(2193): E2238 Multiple declaration for 'FOLDERSETTINGS'
  [C++ Error] shobjidl.h(8095): E2238 Multiple declaration for 'DESKBANDINFO'
  [C++ Error] shlobj.h(1422): E2238 Multiple declaration for 'FVSHOWINFO'
  [C++ Error] shlobj.h(3457): E2238 Multiple declaration for 'SHELLFLAGSTATE'

На том форуме, как вариант, предложили переименовать:
FOLDERSETTINGS -> FOLDERSETTINGS_
DESKBANDINFO    -> DESKBANDINFO_
FVSHOWINFO       -> FVSHOWINFO_
SHELLFLAGSTATE -> SHELLFLAGSTATE_

Я переименовал и всё заработало. Но интересно так правильно или есть другой вариант?
Также объясните пожалуйста значения всех флагов (на будущее).

[zubr]

Но интересно так правильно или есть другой вариант?
Также объясните пожалуйста значения всех флагов (на будущее).

Что значит правильно? В программировании всегда есть множество вариантов, а у программиста есть вариант выбрать самое оптимальное решение для конкретной ситуации. К примеру, в твоем случае, если бы борландская функция SelectDirectory тебя устраивала по функциональности, то проще было бы воспользоваться ей, иначе пришлось искать более универсальное решение.
Чтобы посмотреть значения всех флагов, достаточно открыть MSDN:

ulFlags
Flags specifying the options for the dialog box. This member can include zero or a combination of the following values.
BIF_BROWSEFORCOMPUTER
Only return computers. If the user selects anything other than a computer, the OK button is grayed.
BIF_BROWSEFORPRINTER
Only allow the selection of printers. If the user selects anything other than a printer, the OK button is grayed.
In Microsoft Windows XP, the best practice is to use an XP-style dialog, setting the root of the dialog to the Printers and Faxes folder (CSIDL_PRINTERS).

BIF_BROWSEINCLUDEFILES
Version 4.71. The browse dialog box will display files as well as folders.
BIF_BROWSEINCLUDEURLS
Version 5.0. The browse dialog box can display URLs. The BIF_USENEWUI and BIF_BROWSEINCLUDEFILES flags must also be set. If these three flags are not set, the browser dialog box will reject URLs. Even when these flags are set, the browse dialog box will only display URLs if the folder that contains the selected item supports them. When the folder's IShellFolder::GetAttributesOf method is called to request the selected item's attributes, the folder must set the SFGAO_FOLDER attribute flag. Otherwise, the browse dialog box will not display the URL.
BIF_DONTGOBELOWDOMAIN
Do not include network folders below the domain level in the dialog box's tree view control.
BIF_EDITBOX
Version 4.71. Include an edit control in the browse dialog box that allows the user to type the name of an item.
BIF_NEWDIALOGSTYLE
Version 5.0. Use the new user interface. Setting this flag provides the user with a larger dialog box that can be resized. The dialog box has several new capabilities including: drag-and-drop capability within the dialog box, reordering, shortcut menus, new folders, delete, and other shortcut menu commands. To use this flag, you must call OleInitialize or CoInitialize before calling SHBrowseForFolder.
BIF_NONEWFOLDERBUTTON
Version 6.0. Do not include the New Folder button in the browse dialog box.
BIF_NOTRANSLATETARGETS
Version 6.0. When the selected item is a shortcut, return the PIDL of the shortcut itself rather than its target.
BIF_RETURNFSANCESTORS
Only return file system ancestors. An ancestor is a subfolder that is beneath the root folder in the namespace hierarchy. If the user selects an ancestor of the root folder that is not part of the file system, the OK button is grayed.
BIF_RETURNONLYFSDIRS
Only return file system directories. If the user selects folders that are not part of the file system, the OK button is grayed.
BIF_SHAREABLE
Version 5.0. The browse dialog box can display shareable resources on remote systems. It is intended for applications that want to expose remote shares on a local system. The BIF_NEWDIALOGSTYLE flag must also be set.
BIF_STATUSTEXT
Include a status area in the dialog box. The callback function can set the status text by sending messages to the dialog box. This flag is not supported when BIF_NEWDIALOGSTYLE is specified.
BIF_UAHINT
Version 6.0. When combined with BIF_NEWDIALOGSTYLE, adds a usage hint to the dialog box in place of the edit box. BIF_EDITBOX overrides this flag.
BIF_USENEWUI
Version 5.0. Use the new user interface, including an edit box. This flag is equivalent to BIF_EDITBOX | BIF_NEWDIALOGSTYLE. To use BIF_USENEWUI, you must call OleInitialize or CoInitialize before calling SHBrowseForFolder.
BIF_VALIDATE
Version 4.71. If the user types an invalid name into the edit box, the browse dialog box will call the application's BrowseCallbackProc with the BFFM_VALIDATEFAILED message. This flag is ignored if BIF_EDITBOX is not specified.

[artsb]

Под фразой "правильно ли так" я подразумевал: не будет ли потом проблем или глюков при использовании этой библиотеки в дальнейшем.

Всем спасибо.

[Джон]

) Этого никто гарантировать не может. Но ты можешь быть спокойным. Если из-за этой библиотеки и будут проблемы, то не у тебя в первую очередь, а у системы.

[artsb]

Чтобы не выскакивали ошибки в shlobj.h ничего править не надо.
Делаем так:

#define NO_WIN32_LEAN_AND_MEAN
#include <shlobj.h>