Как указать путь к папке через диалоговое окно?
(Добавление)
и сохранить его в переменную?
(Добавление)
Нажмите для увеличения
1. Budni - 30 Сентября, 2019 - 07:05:11 - перейти к сообщению
2. Budni - 30 Сентября, 2019 - 09:12:25 - перейти к сообщению
Нашел на форуме как указать путь к файлу
Но это не то, нужно именно путь к папке
(Добавление)
Нашел, вроде то:
SHBrowseForFolder(для просмотра ссылки Вам необходимо авторизоваться)
Как её подключить?
Путь к файлу (Отобразить)
Но это не то, нужно именно путь к папке
(Добавление)
Нашел, вроде то:
SHBrowseForFolder(для просмотра ссылки Вам необходимо авторизоваться)
Как её подключить?
3. Zireael - 30 Сентября, 2019 - 17:55:53 - перейти к сообщению
CODE:
#define BIF_NEWDIALOGSTYLE 64
external(INT, "SHBrowseForFolder", "SHBrowseForFolderA", "Shell32.dll");
external(INT, "SHGetPathFromIDList", "SHGetPathFromIDListA", "Shell32.dll");
createdialog(2);
char path[260];
int BROWSEINFO[8]={gethwnd(2), 0, address(#path[0]), 0, BIF_NEWDIALOGSTYLE, 0, 0, 0};
int PIDL=SHBrowseForFolder(address(#BROWSEINFO[0]));
if(PIDL)
{
messagebox(format(#path[0])); // выбранная папка
if(SHGetPathFromIDList(PIDL, address(#path[0])))messagebox(format(#path[0])); // полный путь
}
else messagebox("Ничего не выбрано");
external(INT, "SHBrowseForFolder", "SHBrowseForFolderA", "Shell32.dll");
external(INT, "SHGetPathFromIDList", "SHGetPathFromIDListA", "Shell32.dll");
createdialog(2);
char path[260];
int BROWSEINFO[8]={gethwnd(2), 0, address(#path[0]), 0, BIF_NEWDIALOGSTYLE, 0, 0, 0};
int PIDL=SHBrowseForFolder(address(#BROWSEINFO[0]));
if(PIDL)
{
messagebox(format(#path[0])); // выбранная папка
if(SHGetPathFromIDList(PIDL, address(#path[0])))messagebox(format(#path[0])); // полный путь
}
else messagebox("Ничего не выбрано");