Blog. Just Blog

Тюнинг функции SHBrowseForFolder

Версия для печати Добавить в Избранное Отправить на E-Mail 10.02.2010 | Категория: Образ мышления: Assembler | Автор: ManHunter
Функция API SHBrowseForFolder предназначена для выбора какой-нибудь папки из дерева каталогов всех дисков системы. Со своей задачей она, в принципе, справляется неплохо, но имеет ряд недостатков: окно выбора открывается в произвольных местах экрана, нельзя задать начальный каталог, нельзя менять заголовок окна и т.п. Если посмотреть внимательно на структуру BROWSEINFO, которую функция использует в работе, то в ней обнаруживается интересный параметр - указатель на callback-функцию BrowseCallbackProc. Эта функция получает управление при возникновении различных событий в окне выбора папок. Попробуем с ее помощью немного расширить базовый функционал SHBrowseForFolder. Сперва в сегменте данных определим необходимые значения для создания самого диалога выбора.
Code (Assembler) : Убрать нумерацию
  1. ; Описание структуры BROWSEINFO
  2. struct  BROWSEINFO
  3.         hwndOwner            dd ?
  4.         pidlRoot             dd ?
  5.         pszDisplayName       dd ?
  6.         lpszTitle            dd ?
  7.         ulFlags              dd ?
  8.         lpfn                 dd ?
  9.         lParam               dd ?
  10.         iImage               dd ?
  11. ends
  12.  
  13. ; Структура для работы с папками
  14. bi                BROWSEINFO
  15.  
  16. ; Буфер, который получит выбранных путь
  17. szDisplayName     rb MAX_PATH
  18.  
  19. ; Текст подсказки в окне выбора папки
  20. szTitle           db 'Please select folder',0
Вызов функции обычный, за исключением того, что теперь в структуре BROWSEINFO заполнен указатель на callback-функцию:
Code (Assembler) : Убрать нумерацию
  1.         ...
  2.         ; Заполнить структуру
  3.         mov     [bi.hwndOwner],NULL
  4.         mov     [bi.ulFlags],BIF_RETURNONLYFSDIRS+BIF_DONTGOBELOWDOMAIN
  5.         mov     [bi.pszDisplayName],szDisplayName
  6.         mov     [bi.lpszTitle],szTitle
  7.         ; Указатель на callback-функцию
  8.         mov     [bi.lpfn],BrowseCallbackProc
  9.  
  10.         ; Открыть диалог выбора папки
  11.         invoke  SHBrowseForFolder,bi
  12.         ...
Флаги диалогового окна, а также значения других параметров структуры BROWSEINFO вы можете посмотреть на сайте MSDN.

Теперь перейдем к самому обработчику функции BrowseCallbackProc. В FASM не определены константы, которые в ней используются, сделаем это самостоятельно. Также нам потребуются некоторые дополнительные данные.
Code (Assembler) : Убрать нумерацию
  1. ; Неообходимые константы для callback-функции
  2. BFFM_INITIALIZED  = 1
  3. BFFM_SELCHANGED   = 2
  4. BFFM_ENABLEOK     = (WM_USER + 101)
  5. BFFM_SETSELECTION = (WM_USER + 102)
  6. BFFM_SETOKTEXT    = (WM_USER + 105)
  7.  
  8. ; Временный буфер для задания начального пути
  9. tmp_buff          rb MAX_PATH
  10. ; Текст заголовка окна
  11. szMainTitle       db 'FASM - Simple and powerful',0
  12. ; Текст кнопки OK (должен быть в юникоде)
  13. szOkButton        du 'Yes, my Lord',0
Для примера мы будем обрабатывать два сообщения: BFFM_INITIALIZED и BFFM_SELCHANGED, то есть открытие диалогового окна и выбор в нем какой-нибудь папки.
Code (Assembler) : Убрать нумерацию
  1. ;---------------------------------------------
  2. ; Обработчик callback-функции
  3. ;---------------------------------------------
  4. proc    BrowseCallbackProc hwnd:DWORD,uMsg:DWORD,lParam:DWORD,lpData
  5.         cmp     [uMsg],BFFM_INITIALIZED
  6.         je      .loc_init
  7.         cmp     [uMsg],BFFM_SELCHANGED
  8.         je      .loc_change
  9. .loc_ret:
  10.         xor     eax,eax
  11.         ret
  12.  
  13. .loc_init:
  14.         ; Установить иконку окна
  15.         invoke  GetModuleHandle,0
  16.         invoke  LoadIcon,eax,1
  17.         invoke  SendMessage,[hwnd],WM_SETICON,ICON_BIG,eax
  18.  
  19.         ; Получить текущий каталог
  20.         invoke  GetCurrentDirectory,MAX_PATH,tmp_buff
  21.         ; Установить начальный каталог в окне
  22.         invoke  SendMessage,[hwnd],BFFM_SETSELECTION,TRUE,tmp_buff
  23.  
  24.         ; Изменить стиль окна
  25.         invoke  GetWindowLong,[hwnd],GWL_EXSTYLE
  26.         add     eax,WS_EX_LAYERED
  27.         invoke  SetWindowLong,[hwnd],GWL_EXSTYLE,eax
  28.         ; Установить атрибут прозрачности
  29.         invoke  SetLayeredWindowAttributes,[hwnd],0,200,LWA_ALPHA
  30.  
  31.         ; Изменить текст в заголовке окна
  32.         invoke  SetWindowText,[hwnd],szMainTitle
  33.  
  34.         ; Изменить текст на кнопке OK
  35.         invoke  SendMessage,[hwnd],BFFM_SETOKTEXT,NULL,szOkButton
  36.  
  37.         ; Заблокировать кнопку OK
  38.         invoke  SendMessage,[hwnd],BFFM_ENABLEOK,NULL,FALSE
  39.  
  40.         ; Субклассировать обработчик окна
  41.         invoke  SetWindowLong,[hwnd],GWL_WNDPROC,NewWindowProc
  42.         ; Сохранить адрес предыдущего обработчика
  43.         invoke  SetWindowLong,[hwnd],GWL_USERDATA,eax
  44.  
  45.         ; Установить окно по центру экрана
  46.         stdcall WindowToCenter,[hwnd],0
  47.         jmp     .loc_ret
  48.  
  49. .loc_change:
  50.         ; Разблокировать кнопку OK
  51.         invoke  SendMessage,[hwnd],BFFM_ENABLEOK,NULL,TRUE
  52.         jmp     .loc_ret
  53. endp
Для установки окна по центру экрана используется описанная ранее функция WindowToCenter. Субклассированный обработчик применяется для перетаскивания окна за любое место.
Code (Assembler) : Убрать нумерацию
  1. proc NewWindowProc hwnd:DWORD,uMsg:DWORD,wParam:DWORD,lParam:DWORD
  2.         ; Нажатие левой клавиши мыши?
  3.         cmp     [uMsg],WM_LBUTTONDOWN
  4.         je      .loc_drag
  5.  
  6.         ; Передать управление предыдущему обработчику
  7.         invoke  GetWindowLong,[hwnd],GWL_USERDATA
  8.         invoke  CallWindowProc,eax,[hwnd],[uMsg],[wParam],[lParam]
  9.         ret
  10.  
  11. .loc_drag:
  12.         ; Перетаскивание окна
  13.         invoke  ReleaseCapture
  14.         invoke  SendMessage,[hwnd],WM_SYSCOMMAND,61458,0
  15.  
  16. .exit_proc:
  17.         ; Подавить сообщение и вернуть из обработчика FALSE
  18.         xor     eax,eax
  19.         ret
  20. endp
Теперь у нас получается окно выбора папки, установленное по центру экрана, полупрозрачное, с иконкой, с установленным по умолчанию текущим каталогом, с собственным текстом на кнопке OK и в заголовке окна, да еще и перетаскиваемое за любое место. А кнопка OK в нем активируется только при выборе какой-нибудь папки. По-моему тюнинг получился неплохой.

В приложении пример программы, реализующей все вышеперечисленные новые функции. Для сравнения в нее добавлена функция открытия обычного диалога выбора папки.

Пример программы с исходным текстом (FASM)Пример программы с исходным текстом (FASM)

Advanced.SHBrowseForFolder.Demo.zip (5,549 bytes)


Поделиться ссылкой ВКонтакте
Просмотров: 9131 | Комментариев: 5

Внимание! Статья опубликована больше года назад, информация могла устареть!

Комментарии

Отзывы посетителей сайта о статье
user (09.10.2015 в 16:47):
)) Ну вот, снова наткнулся на этот блог.

Добавлю, szDisplayName должна быть статично определена в сегменте данных.
Иначе функция SHBrowseForFolder(..) начинает вести себя непредсказуемо и очень неприятно. Что и стоило пары часов нехороших ощущений.

Ну, например, если определить строку в стеке локально, то первый же вызов SHBrowseForFolder(..) заканчивался записью по невалидному адресу в shell32.dll (а это должна быть ссылка на сегмент данных shell32.dll в нормальном случае).

При этом если перед вызовом этой функции в диалоге генерируется хотя бы один вызов MessageBox'а или одна операция с ListBox'ом, тогда дальше SHBrowseForFolder(..) уже работает нормально даже при локальном определении этой строки. Почему-то.

В общем, такие вот дела..
semiono (02.10.2010 в 22:10):
"окно выбора открывается в произвольных местах экрана,"
Самое противное что есть, это беспорядочные окна! Всегда борюсь за порядок на рабочем столе...
Puk (02.05.2010 в 17:15):
Так и писали бы что рефералы нужны! Я их отключаю в браузере, разрешаю только в экстренных случаях, когда без них сайт неадекватен.
Zummenix (10.02.2010 в 19:53):
Отличный пример :)
в обработчик .loc_change добавил проверку
.loc_change:
        ; Заблокировать кнопку OK
        invoke  SendMessage,[hwnd],BFFM_ENABLEOK,NULL,FALSE

        ; Проверить выбранный путь
        invoke  SHGetPathFromIDList,[lParam],szDisplayName
        cmp     byte [szDisplayName],0
        je      .loc_ret

        ; Если все в порядке, то разблокировать кнопку OK
        invoke  SendMessage,[hwnd],BFFM_ENABLEOK,NULL,TRUE
        jmp     .loc_ret
SAY (09.02.2010 в 08:10):
Здорово!

Добавить комментарий

Заполните форму для добавления комментария
Имя*:
Текст комментария (не более 2000 символов)*:

*Все поля обязательны для заполнения.
Комментарии, содержащие рекламу, ненормативную лексику, оскорбления и т.п., а также флуд и сообщения не по теме, будут удаляться. Нарушителям может быть заблокирован доступ к сайту.
Это я :-)
Если программист в девять утра уже на работе, значит он там же и ночевал
Главная страница Web-мастеру и не только Образ мышления: Assembler Мои программы Software Темная сторона Силы Обзоры техники А еще я туда ем! Жизнь в оффлайне Всякая всячина
Карта сайта Ссылки Обратная связь Правила сайта Настройки сайта RSS-канал
Ограничение по возрасту 16+ Материалы, опубликованные на этом сайте, не рекомендуются к просмотру лицам в возрасте до 16 лет без присутствия взрослых.
Метки статей
.NET (27), AJAX (5), Assembler (348), COM (39), CSS (39), Exif (15), FASM (8), Firefox (7), HDD (17), Hello Teddy (9), HTML (48), iconBIT (4), JavaScript (68), MySQL (13), Nikon (19), PDF (9), PHP (119), Samsung (6), SEO (12), Sublime Text (9), TintonLife (4), UGREEN (4), Windows 7 (66), аккумуляторы (22), аксессуары (12), анализаторы файлов (8), архиваторы (5), аттракционы (7), безопасность (55), браузеры (16), бытовая техника (19), варенье (18), ВВЦ (9), ВДНХ (14), видео (20), Воробьевы горы (9), вторые блюда (120), выпечка (27), выставки (116), генератор ПСЧ (10), графика (118), десерты (31), Египет (8), заготовки на зиму (45), закуска (21), закуска к пиву (24), зарядные устройства (23), защита (15), зоопарки (10), игры (36), иконки (22), интерфейс (26), исследование защиты (306), каша (4), клавиатура (7), Коломенское (37), консоль (7), концерты (52), Кузьминки (4), куклы (27), ледяные скульптуры (6), мои программы (68), мониторы (6), музеи (72), мультимедиа (70), мясо (59), напитки (14), ноутбуки (8), обфускация (7), окна (69), оформление сайта (47), парки Москвы (7), песчаные скульптуры (13), плееры (10), подводная съемка (4), поздравления (127), полезные функции (39), прохождения (4), процессы (25), птица (20), путешествия (25), распаковка (22), реверсинг (51), рыба (34), салаты (18), сброс триала (4), сеть (36), система (177), Сокольники (8), соусы (14), супы (14), телефоны (8), Тунис (6), умный дом (12), файлы справки (6), фаст-фуд (18), фестиваль цветов (5), флешки (5), фото (23), хеши (16), числа (8), юмор (12), яйца (17), Яндекс (10)
Вам помог этот сайт?
Сказать спасибо! Поблагодарили 34,326 раз
<< 2024 - АПРЕЛЬ >>
Пн Вт Ср Чт Пт Сб Вс
1 2 3 4 5 6 7
8 9 10 11 12 13 14
15 16 17 18 19 20 21
22 23 24 25 26 27 28
29 30          
Национальный день донора крови
Всемирный день цирка
Нашли на сайте орфографическую ошибку? Выделите ее мышкой и нажмите
Ctrl
+
Enter
Буду очень благодарен, если размеcтите мою кнопочку:
Личный блог ManHunter'а
Valid CSS Valid XHTML 1.0 Transitional Valid mobileOK Basic Valid RSS
Яндекс тИЦ: {YANDEX_TIC} Яндекс ИКС: 380
Сейчас я слушаю
---
Имя:

Сообщение:

Осталось символов: 200

   
-
Наверх
Powered by PCL's Speckled Band Engine 0.2 RC3
© ManHunter / PCL, 2008-2024
При использовании материалов ссылка на сайт обязательна
Время генерации: 0.09 сек. / MySQL: 2 (0.0097 сек.) / Память: 4.5 Mb
Наверх