Образ мышления: Assembler
То, что не удается запрограммировать на Ассемблере, приходится паять
Образ мышления: Assembler - RSS-канал
Образ мышления: Assembler - Карта сайта
Перетаскивание окна за любое место правой кнопкой мыши
24.07.2018 | Категория: Образ мышления: Assembler | Автор: ManHunter
В одной из первых статей на этом блоге я рассказывал, как легко сделать перетаскивание окна за любое место левой кнопкой мыши. А тут что-то мне захотелось странного, а именно реализовать перетаскивание окна точно так же за любое место, но только правой кнопкой мыши. Как оказалось, простым пробросом сообщения от мышки на заголовок окна сделать это нельзя. После некоторых раздумий у меня получился вот такой вариант. При клике мышкой по окну оно захватывает события мыши при помощи функции SetCapture и сохраняет начальные координаты окна, при перемещении курсора принудительно перемещает окно вслед за ним, а при отпускании кнопки мышки освобождает перехват событий мыши функцией ReleaseCapture. Начнем с обработчика сообщений окна.Code (Assembler) : Убрать нумерацию
- ; Установка обработчика перетаскивания правой кнопкой
- ; мыши и колесиком
- cmp [msg],WM_RBUTTONDOWN
- je .drag_window_set
- cmp [msg],WM_MBUTTONDOWN
- je .drag_window_set
- ; Снятие обработчика перетаскивания правой кнопкой
- ; мыши и колесиком
- cmp [msg],WM_RBUTTONUP
- je .drag_window_release
- cmp [msg],WM_MBUTTONUP
- je .drag_window_release
- ; Обработчик перемещения мыши
- cmp [msg],WM_MOUSEMOVE
- je .drag_window_ex
Читать статью целиком »
Просмотров: 1705 | Комментариев: 0
Ассоциация файлов с программой
12.07.2018 | Категория: Образ мышления: Assembler | Автор: ManHunter
Сегодня разберем пример ассоциации файлов с программой. В Windows это один из краеугольных камней работы системы. С определенным расширением файлов связана та или иная программа. При клике на документе открывается Word, при открытии html-документа запускается браузер, картинки открываются в просмотрщике, а файлы проектов различных программ открываются в этих программах. Это хорошо и правильно.Для установки связки определенного расширения файлов со своей программой, сперва надо придумать название типа. Для примера, пусть это будет "MyApplication". Затем в ветке реестра HKEY_CLASSES_ROOT надо создать ключ, соответствующий нужному расширению и присвоить значение параметра по умолчанию, равное придуманному имени.
[HKEY_CLASSES_ROOT\.pcl]
@="MyApplication"
Если программа работает с несколькими расширениями файлов, то для каждого из них точно так же надо прописать ассоциацию с типом "MyApplication".
Теперь надо настроить программу, соответствующую типу "MyApplication". Сперва создается ключ в реестре "HKEY_CLASSES_ROOT\MyApplication". Затем нужно настроить иконку, которая будет отображаться в Проводнике у всех связанных файлов. За это отвечает ключ реестра "HKEY_CLASSES_ROOT\MyApplication\DefaultIcon". В этом примере файлы будут иметь иконку, которая назначена в ресурсах приложения в качестве основной.
[HKEY_CLASSES_ROOT\MyApplication\DefaultIcon]
@="D:\\DEMO\\association.exe,0"
При запуске связанной программы ей в качестве параметра должен передаваться полный путь к файлу, который открывается. Делается это настройкой ключа реестра "MyApplication\Shell\Open\command".
[HKEY_CLASSES_ROOT\MyApplication\Shell\Open\command]
@="\"D:\\DEMO\\association.exe\" \"%1\""
Для отмены ассоциаций достаточно удалить ключи "HKEY_CLASSES_ROOT\MyApplication" и "HKEY_CLASSES_ROOT\.pcl". Вот и вся премудрость.
Читать статью целиком »
Просмотров: 1648 | Комментариев: 1
Установка окна по центру с учетом нескольких мониторов
24.06.2018 | Категория: Образ мышления: Assembler | Автор: ManHunter
И вновь работа над ошибками. На этот раз переосмысление статьи об установке окна по центру экрана. Приведенный там код работает без проблем, но только для единственного монитора, при наличии двух и более мониторов результат получается неправильным. Основные принципы работы с несколькими мониторами я расписал в предыдущей статье, повторять не буду.Code (Assembler) : Убрать нумерацию
- ;-------------------------------------------------------------------------
- ; Процедура перемещения окна в центр экрана. Если окно развернуто или
- ; его размеры превышают размеры экрана, то окно не перемещается
- ; Параметры:
- ; hwnd - хэндл окна
- ; mode - относительно каких координат центровать окно (1 - только
- ; рабочая область экрана с учетом размеров панели задач и
- ; различных тулбаров, 0 - относительно размеров всего экрана)
- ;-------------------------------------------------------------------------
- proc WindowToCenterEx hwnd:DWORD, mode:DWORD
- MONITOR_DEFAULTTONEAREST = 2
- struct MONITORINFO
- cbSize dd ?
- rcMonitor RECT
- rcWork RECT
- dwFlags dd ?
- ends
- locals
- minfo MONITORINFO
- coord RECT
- endl
- ; Сохранить все регистры
- pusha
- ; Такое окно существует?
- invoke IsWindow,[hwnd]
- or eax,eax
- jz .loc_ret
- ; Окно развернуто на весь экран?
- invoke IsZoomed,[hwnd]
- or eax,eax
- jnz .loc_ret
- ; Получить размеры окна
- lea eax,[coord]
- invoke GetWindowRect,[hwnd],eax
- ; Монитор, на котором находится окно
- invoke MonitorFromWindow,[hwnd],MONITOR_DEFAULTTONEAREST
- ; В регистре ESI указатель на структуру информации о мониторе
- lea esi,[minfo]
- mov [esi+MONITORINFO.cbSize],sizeof.MONITORINFO
- invoke GetMonitorInfo,eax,esi
- ; Весь экран
- lea esi,[minfo.rcMonitor]
- cmp [mode],0
- je @f
- ; Рабочая область экрана
- lea esi,[minfo.rcWork]
- @@:
- mov eax,[esi+RECT.right]
- sub eax,[esi+RECT.left]
- lea edi,[coord]
- mov ebx,[edi+RECT.right]
- sub ebx,[edi+RECT.left]
- ; Окно шире монитора
- cmp ebx,eax
- jg .loc_ret
- mov ecx,[esi+RECT.bottom]
- sub ecx,[esi+RECT.top]
- mov edx,[edi+RECT.bottom]
- sub edx,[edi+RECT.top]
- ; Окно выше монитора
- cmp edx,ecx
- jg .loc_ret
- shr ebx,1
- shr eax,1
- add eax,[esi+RECT.left]
- sub eax,ebx
- shr edx,1
- shr ecx,1
- add ecx,[esi+RECT.top]
- sub ecx,edx
- ; Разместить окно по центру монитора
- invoke SetWindowPos,[hwnd],NULL,eax,ecx,NULL,NULL,\
- SWP_NOSIZE+SWP_NOZORDER
- .loc_ret:
- ; Восстановить все регистры
- popa
- ret
- endp
Читать статью целиком »
Просмотров: 1696 | Комментариев: 5
Магнитное окно с учетом нескольких мониторов
04.06.2018 | Категория: Образ мышления: Assembler | Автор: ManHunter
Продолжаем работу над ошибками. Несколько лет назад в одной из статей я рассказывал, как сделать окно, которое при перемещении будет прилипать ко краям экрана. Этот способ рабочий, но он не учитывает ситуацию, когда у пользователя более одного монитора. Дело в том, что функция SystemParametersInfo с параметром SPI_GETWORKAREA возвращает координаты рабочей области только основного монитора. Для поддержки нескольких мониторов, в том числе произвольных размеров, надо сперва определить, на каком мониторе находится окно. Затем надо будет получить характеристики этого монитора, точнее координаты его рабочей области. Но сперва придется определить структуру и константу, про которую не знает коробочный FASM.Code (Assembler) : Убрать нумерацию
- MONITOR_DEFAULTTONEAREST = 2
- struct MONITORINFO
- cbSize dd ?
- rcMonitor RECT
- rcWork RECT
- dwFlags dd ?
- ends
Читать статью целиком »
Просмотров: 1930 | Комментариев: 0
Извлечение главной иконки из исполняемого файла
18.05.2018 | Категория: Образ мышления: Assembler | Автор: ManHunter
Извлечение главной иконки из исполняемого файла
В комментариях к недавней статье про замену главной иконки исполняемого файла задали очень правильный вопрос: как извлечь иконки из ресурсов исполняемого файла? Сегодня я постараюсь подробно рассказать вам, как это делается.
Читать статью целиком »
Просмотров: 2440 | Комментариев: 4