Міністерство освіти РФ
ІНСТИТУТ ПЕРЕПІДГОТОВКИ КАДРІВ
Уральського державного технічного університету
Кафедра мікропроцесорної техніки
Курсова робота
Програма демонструє ієрархію вікон Windows
керівник: Кулюкін В.П.
слухач гр.СП-923:
2001р.
Зміст
Введення
1. Віконні програми Windows.
2. Каркасне Windows-додаток на асемблері
3. Ієрархія вікон
4. «Програма демонструє ієрархію вікон Windows»
5.Бібліографіческій список
Введення
У переважній більшості книг про програмування для Windows виклад, як правило, ведеться
на базі мови C/C + +, рідше - на базі Pascal. А що ж асемблер - осторонь? Звичайно, ні! Ми не раз звертали вашу увагу на правильне
розуміння місця асемблера в архітектурі комп'ютера. Будь-яка програма на мові самого високого рівня у своєму внутрішньому вигляді являє собою
послідовність машинних кодів. А раз так, то завжди залишається теоретична можливість написати ту ж програму, але вже на мові асемблера: Нерозуміння
або недооцінка такої можливості призводить до того, що досить часто доводиться чути фразу, подібну до наступного: «Ах, знову цей асемблер, але
адже це щось несерйозне! »Також важко погодитися з тезою, що частіше за все слід слідом за цією фразою. Суть його зводиться до утвердження того, що
потужність сучасних комп'ютерів дозволяє не розглядати проблему ефективності функціонування програми як першочергове. Набагато легше вирішити її
за рахунок збільшення обсягу пам'яті, швидкодії центрального процесора і якості комп'ютерної периферії. Чим обгрунтувати необхідність розробки Windows-додатків на мові асемблера? Наведемо наступні
аргументи:
мовою асемблера дозволяє програмісту повністю контролювати створюваний ним програмний код і оптимізувати його на свій розсуд;
компілятори мов високого рівня поміщають в завантажувальний модуль програми надлишкову інформацію. Еквівалентні
виконувані модулі, початковий текст яких написаний на мові асемблера, мають у декілька разів менший розмір;
при програмуванні на асемблері зберігається повний доступ до апаратних ресурсів комп'ютера;
додаток, написаний на мові асемблера, як правило, швидше завантажується в оперативну пам'ять комп'ютера;
додаток, написаний на мові асемблера, володіє, як правило, більш високою швидкістю роботи і
реактивністю відповіді на дії користувача. Зрозуміло, ці аргументи не слід сприймати, як деяку рекламну кампанію на підтримку мови
асемблера. Але не можна забувати і про те, що існує нескінченна безліч прикладних задач, що чекають своєї черги на комп'ютерну реалізацію. Далеко не
всі з цих завдань вимагають застосування великовагових засобів розробки, результатом роботи яких є настільки ж великовагові виконувані файли.
Багато прикладні задачі можуть бути витончено виконані на мові асемблера, не втрачаючи привабливості.
1. Віконні програми Windows.
Windows підтримує два типи програм:
віконне додаток - будується на базі спеціального набору функцій (API), що становлять графічний інтерфейс користувача (GUI, Graphic User Interface). Віконне додаток являє собою програму, яка
весь висновок на екран виробляє в графічному вигляді. Першим результатом роботи віконного програми є відображення на екрані спеціального об'єкта --
вікна. Після того як вікно відображено на екрані, вся робота програми спрямована на те, щоб підтримувати її в актуальному стані;
Основний тип програм в Windows - віконні, тому з них ми і почнемо знайомство з
процесом розробки програм для цієї операційної системи.
Будь-яке віконне Windows-додаток має типову структуру, основу якої складає так зване каркасне додаток. Ця програма містить
мінімально необхідний програмний код для забезпечення повноцінного функціонування Windows-програми. Не випадково у всіх джерелах як
перший Windows-програми рекомендується вивчати і досліджувати роботу певного каркасного програми, тому що саме воно відображає основні особливості
взаємодії програми з операційною системою Windows. Більш того, написав і налагодити один раз каркасне
додаток, ви будете використовувати його в необхідну термінологію і зможемо більше уваги приділити логіці роботи Windows-програми,
а не деталей його реалізації.
Мінімальна додаток Windows складається з трьох частин:
головної функції;
циклу обробки повідомлень;
віконної функції.
Виконання будь-якого віконного Windows-програми починається з головної функції. Вона
містить код, який здійснює настройку (ініціалізацію) додатки в середовищі операційної системи Windows. Видимим для користувача
результатом роботи головної функції є поява на екрані графічного об'єкта у вигляді вікна. Останнім дією коду головної функції є створення
циклу обробки повідомлень. Після його створення додаток стає пасивним і починає взаємодіяти із зовнішнім світом за допомогою спеціальних
чином оформлених даних - повідомлень. Обробка що надходять з додатком повідомлень здійснюється спеціальною функцією, званої віконної. Віконна
функція унікальна тим, що може бути викликана тільки з операційної системи, а не з програми, яка її містить. Таким чином, Windows-додаток, як мінімум, має складатися з трьох перерахованих
елементів.
Каркасне Windows-додаток на асемблері містить один сегмент даних. data і один сегмент коду. code.
Сегмент стека у вихідних текстах Windows-додатків безпосередньо описувати не потрібно. Windows виділяє для
стьобаючи обсяг пам'яті, розмір якого задано програмістом у файлі з розширенням. def. Текст лістингу 2 достатньо великий. Тому для
обговорення розіб'ємо erо коментарями на характерні фрагменти, кожен з яких потім пояснимо необхідним ступенем деталізації.
2. Каркасне Windows-додаток на асемблері
; Приклад каркасного програми для Win32
.386
locals; дозволяє застосування локальних міток у програмі
. model flat, STDCALL; модель пам'яті flat Я
; STDCALL - передача параметрів в стилі С (справа наліво),
; викликається процедура чистить за собою стек Ш
include windowA.inc; що включається файл з описами базових структур
; і констант Win32 т
; Оголошення зовнішніми що використовуються в даній програмі функцій Win32 (ASCII):
extrn GetModuleHandleA: PROC
extrn GetVersionExA: PROC В
extrn GetCommandLineA: PROC
extrn GetEnvironmentStringsA: PROC
extrn GetEnvironmentStringsA: PROC
extrn GetStartupInfoA: PROC
extrn LoadIconA: PROC
extrn LoadCursorA: PROC
extrn GetStockObject: PROC
extrn RegisterClassExA: PROC
extrn CreateWindowExA: PROC
extrn ShowWindow: PROC
extrn UpdateWindow: PROC
extrn GetMessageA: PROC
extrn TranslateMessage: PROC
extrn DispatchMessageA: PROC
extrn ExitProcess: PROC
extrn PostQuitMessage: PROC
extrn DefWindowProcA: PROC
extrn PlaySoundA: PROC
extrn ReleaseDC: PROC
extrn TextOutA: PROC
extrn GetDC: PROC
extrn BeginPaint: PROC
extrn EndPaint: PROC
; оголошення віконної функції об'єктом, видимим за межами даного коду
public WindowProc
. data
hwnd dd 0
hInst dd 0
hdc dd 0
; lpVersionInformation OSVERSIONINFO
wcl WNDCLASSEX
message MSG
ps PAINTSTRUCT
szClassName db 'Додаток Win32', 0
szTitleName db 'Каркасне додаток Win32 на асемблері' .0
MesWindow db 'Це процес розробки програми
на асемблері? '
MesWindowLen = $-MesWindow
playFileCreate db 'create.wav', 0
playFilePaint db 'paint.wav', 0
playFileDestroy db 'destroy.wav', 0
. code
start proc near
; точка входу в програму:
; початок стартового коду
; виклики розташованих нижче функцій можна при необхідності розкоментувати,
: але вони не є обов'язковими в даній програмі
; виклик BOOL GetVersionEx (LPOSVERSIONINFO lpVersionInformation)
; push offset lpVersionInformation
; call GetVersionExA
; далі можна вставити код для аналізу інформації про версію Windows
; виклик LPTSTR GetCommandLine (VOID) - отримати покажчик на командний рядок
; call GetCommandLineA: врегістре ЕАХ адреса
; виклик LPVOID GetEnvironmentStrings (VOID) - отримати покажчик
; на блок із змінними оточення
; call GetEnvironmentStringsA; врегістре ЕАХ адреса
; виклик VOIDGetStartupInfo (LPSTARTUPINFO lpStartupInfo); покажчик
; на структуру STARTUPINFO
; push offset lpStartupInfo
; call GetStartupInfoA
; виклик HMODULE GetModuleHandleA (LPCTSTR lpModuleName)
push NULL; 0 -> GetModuleHandle
call GetModuleHandleA; отримати значення базової адреси,
mov hInst, eax; no якому завантажений модуль.
; далі hInst буде використовуватися в якості дескриптора даного застосування
; кінець стартового коду
WinMain:
; визначити клас вікна ATOM RegisterClassEx (CONST WNDCLASSEX * lpWndClassEx),
; де * lpWndClassEx - адреса структури WndClassEx
; для початку ініціалізіруем поля структури WndClassEx
mov wcl.cbSize, typeWNDCLASSEX -. розмір структури
: у wcl.cbCIZE
mov wcl.style, CS_HREDRAW + CS_VREDRAW
mov wcl.pfnWndProg, offsetWindowProg; адресу віконної процедури
mov wcl.cbCisExtra, 0
mov wcl.cbWndExtra, 0
mov eax, hInst
mov; дискриптор додатки в поле hInstance структури wcl
mov wcl.hInstance, eax
; готуємо виклик HICON LoadIcon (HINSTANCE hInstance, LPCTSTR lpIconName)
push IDI_APPLICATION,-стандартний значок
push 0; NULL
сап LoadIconA
mov wcl.hIcon, eax,-дескриптор значка в полі hIcon I
; структури wcl
; готуємо виклик HCURSOR LoadCursorA (HINSTANCE hInstance, LPCTSTR M; lpCursorName)
push IDC_ARROW,-стандартний курсор - стрілка
push 0
саll LoadCursorA
mov wcl.hCursor, eax; дескриптор курсору в полі hCursor
; структури wc1
; визначимо колір фону вікна - білий
; готуємо виклик HGDIOBJ GetStockObject (int fnObject)
push WHITE_BRUSH
сап GetStockObject
mov wcl.hbrBackground, eax
mov dword ptrwcl.lpszMenuName, 0; без головного меню
mov dwordptrwcl.lpszClassName, offsetszC1assName; ім'я
; класу вікна
mov wcl.hIconSm, 0
; реєструємо клас вікна - готуємо виклик RegisterClassExA (& wndclass)
push offset wcl
сап RegisterClassExA
test ax, ах; перевірити на успіх реєстрації класу вікна
jz end_cyc1_msg; невдача
; створюємо вікно:
; готуємо визовHWND CreateWindowExA (DWORDdwExStyle,
LPCTSTR1pClassName,
; LPCTSTR 1pW1ndowName, DWORD dwStyle, int x, int у, int nWidth,
|; int nHeight,
; HWND hWndParent, HMENU hMenu, HANDLE hInstance, LPVOID
; lpParam)
push 0; lpParam
push hInst; hInstance
push NULL; menu
push NULL; parent hwnd
push CW_USEDEFAULT; висота вікна
push CW_USEDEFAULT; ширина вікна
push CW_USEDEFAULT; координата біля лівого верхнього кута
; вікна
push CW_USEDEFAULT; координата х лівого верхнього кута
push WS_OVERLAPPEDWINDOW; стиль вікна
push offset szTitleName; рядок заголовка вікна
push offset szClassName; ім'я класу вікна
push NULL
саll CreateWindowExA
mov hwnd, eax;-дескриптор вікна
; показати вікно:
; готуємо виклик BOOL ShowWindow (HWND hWnd, int nCmdShow)
push SW_SHOWNORMAL
push hwnd
call ShowWindow
; перемальовує вміст вікна
; готуємо виклик BOOL UpdateWindow (HWND hWnd)
push hwnd
call UpdateWindow
; запускаємо цикл повідомлень:
; готуємо виклик BOOL GetMessageA (LPMSG lpMsg, HWND hWnd,
; UINTwMsgFilterMin, UINTwMsgFilterMax)
cycl_msg:
push 0
push 0
push NULL
push offset message
cal 1 GetMessageA
cmp ах, 0
je end_cycl_msg
; трансляція введення з клавіатури
; готуємо виклик BOOL Trans1ateMessage (CONST MSG * lpMsg)
push offset message
call TranslateMessage
; відправимо повідомлення віконної процедури
; готуємо виклик LONG D1spatchMessage (CONST MSG * lpmsg)
push offset message
call DispatchMessageA
jmp cycl_msg
end_cycl_msg:
; вихід з програми
; готуємо виклик VOID ExitProcess (UINT uExitCode)
push NULL
call ExitProcess
start endp
; - - - - - - - - - - - - - WindowProc - - - - - - - - - - - - --
- - - - - - - - - - - - - - - - - - - - - - - -
WindowProc proc
argP0nwnd: DWORD, PPmes: DWORD, @ @ wparam: DWORD, @ @ lparam: DWORD
uses ebx, edi, es1; ці регістри обов'язково повинні зберігатися
local @ @ hdc: DWORD
cmp @ @ mes, WM_DESTROY
je wmdestroy
cmp @ @ mes, WM_CREATE
je wmcreate
cmp @ @ mes, WM_PAINT
je wmpaint
jmp default
wmcreate:
; позначимо створення вікна звуковим ефектом
; готуємо виклик функції BOOL PlaySound (LPCSTR pszSound, HMODULE hmod, DWORD
; fdwSound)
push SND_SYNC + SND_FILENAME
push NULL
push offset playFileCreate
call PlaySoundA
mov eax, О; повертається значення - 0
jmp exit_wndproc
wmpaint:
push SND_SYNC + SND_FILENAME
push NULL
push offset playFIilePaint
call P1aySoundA
; отримаємо контекст пристрою HDC BeginPaint (HWND nwnd, LPPAINTSTRUCT; LPpAINT)
push offset ps
push @ @ hwnd
call BeginPaint
mov @ @ hdc, eax
; виведемо рядок тексту у вікно BOOL TextOut (HDC hdc. int nXStart, int
: nYStart.
; LPCTSTR lpString, int cbString)
push MesWindowLen
push offset MesWindow
push 100
push 10
push @ @ hdc
call TextOutA
: ocвoбoдітькoнтeкcтBOOLEndPaint (HWNDhWnd, CONSTPAINTSTRUCT * lpPai push offset ps
push @ @ hdc
call EndPaint
mov ЕАХ, 0; повертається значення-0
jmp exit_wndproc
wmdestroy:
push SND_SYNC + SND_FILENAME
push NULL
push offset playFileDestroy
call PlaySoundA
; відправити повідомлення WМ_QUIТ
; готуємо виклик VOID PostQuitMessage (int nExitCode)
push 0
call PostQuitMessage
mov eax, О; повертається значення - 0
jmp exit_wndproc
default:
; обробка за замовчуванням
; готуємо виклик LRESULTDefWindowProc (HWND hWnd, UINTMsg,
; WPARAMwParam, LPARAMlParam)
push @ @ lparam
push @ @ wparam
push @ @ mes
push @ @ nwnd
call DefWindowProcA
jmp exit_wndproc
; ... ... ...
exit_wndproc:
ret
WindowProc endp
end start
3.Іерархія вікон
Вивчивши з дисципліни «Системне програмне забезпечення» написання вікон Windows на мові Assembler та
розглядаючи графічну віконну систему не можна обійтися без докладного розгляду того, які вікна можна відображати на екрані.
Тип вікна задається 32-бітовим без знаковим цілим числом, що вказується третім параметром виклику функції Create Window.
Існує всього лише три основні типи вікон Window.
1 тип. Перекриваються вікна. Прапор WS_OVERLAPPED.
2 тип. Допоміжні вікна. Прапор WS_POPUP.
3 тип. Дочірні вікна. . Прапор WS_CHILD.
Для написання курсового проекту, який має тему «Програма демонструє
ієрархію вікон Windows »були використані саме ці типи вікон.
Потрібно про них пам'ятати наступне що:
перекриваються вікно ніколи не має батьків
Дочірнє вікно завжди має батька.
Допоміжне вікно може мати і не мати батька, якщо воно має батька, то все одно це не дочірнє, а
допоміжне вікно.
І З усіх концепцій системи управління вікнами найбільш фундаментальною є ставлення предок/нащадок/сусід. Як ми
бачили при описі структури даних WND, кожне вікно містить логічний номер вікна свого предка, логічний номер свого першого дочірнього вікна і логічний
номер наступного сусіднього вікна. Сусідніми є вікна, які мають однакове батьківське вікно. Насправді значення HWND є просто ближніми
покажчиками в локальній "купі" модуля USER, тому ви можете розглядати їх як покажчики зв'язкового списку, які дозволяють обходити шляху
в ієрархії вікон. Ієрархія вікон, створювана модулем USER, показана на рис.1.
Ієрархія вікон обходиться в усіх трьох напрямках - від пращура до нащадка, від нащадка до предка і від
сусіда до сусіда. Приклади обходу ієрархії включають наступне:
• При знищенні вікна модуль USER повинен знищити всіх його нащадків, а також їхніх нащадків. USER обходить
всю ієрархію, використовуючи поля hWndChild і hWndNext-Нагадаємо, логічні номера вікон є просто ближніми покажчиками в локальній "купі" модуля
USER.
• Коли відбувається передача фокусу вводу при натисканні клавіші Tab між елементами упра?? лення у вікні
діалогу (що є нащадками вікна діалогу), покажчики на сусіднє вікна (або поле hWndNext) з'єднують один з одним елементи управління. Крім того,
упорядкування вікон у списку hWndChild і hWndNext відображає Z-порядок вікон на екрані. Z-порядок являє собою відносну позицію вікон у третьому
вимірі (у напрямку від екрану до вас). Якщо ви клацанням кнопки миші вибираєте різні основні вікна;
щоб помістити їх у вершину Z-порядку, їх відносні позиції в списку hWndNext зсуваються.
Рис .. 1 Ієрархія вікон, створена модулем USER.
• Коли з допомогою клацання кнопки миші ви вибираєте діалогове керуюче вікно, це призводить до того, що
менеджер діалогів просмарівает ланцюжок покажчиків предка, щоб подивитися, чи необхідно зробити активним вікно додатка верхнього рівня (основне).
У корені дерева вікон знаходиться desktop-вікно. Це вікно покриває весь екран і завжди знаходиться на
вершині Z-порядку. Це означає, що воно завжди знаходиться позаду всіх інших вікон. Desktop-вікно є першим створеним вікном, і це єдине вікно в
системі, яка не має вікна одного з батьків або власника. (Вікна-власники описані далі.) Фарбування вікна фону відповідає за "шпалери" Windows.
Desktop-вікно нічим особливим не виділяється в сенсі встановлення спеціальних бітів або т.п. Воно
створюється з битами стилю (обговорюються нижче) WS_POPUP і WS_CLIPCHILDREN. Немає ніякого недокументовані біта стилю WS_DESKTOP. Замість цього логічний
номер desktop-вікна зберігається в глобальній змінній модуля USER з ім'ям HWndDesktop. Коли системі управління вікнами потрібно знати, чи має вона справу з
desktop-вікном, вона просто порівнює HWND, про який йде мова, з HWndDesktop. Ви можете отримати значення змінної HWndDesktop, використовуючи документовану
API-функцію GetDesktopWindow ().
ВОЛОДІННЯ вікнами в Windows
Поряд зі ставленням предок/нащадок. Windows також підтримує зовсім інше поняття володіння.
Кожне вікно має поле в своїй структурі даних, що містить логічний номер вікна, яке володіє цим вікном. На відміну від ставлення предок/нащадок,
відношення володіння вікна є односпрямованим. Вікна відомий логічний номер його вікна-власника, але воно не знає логічних номерів вікон, якими воно
володіє.
Власник вікна - це вікно, яке отримує повідомлення для вікна, яким воно володіє. Наприклад,
коли ви створюєте вікно меню WS_POPUP за допомогою функції TrackPopupMenu (), ви ставите власника вікна. Власник вікна отримує повідомлення WM_COMMAND,
що виникає при виборі пункту меню. Важливо відзначити, що в загальному випадку батьківське вікно і власник вікна зовсім різні. Відношення предок/нащадок
встановлює, де в ієрархії вікон знаходиться вікно, тоді як власник вікна визначає, які вікна отримують повідомлення, призначені для вікон, якими
вони володіють.
Особливість вищенаведеного правила відноситься і до вікон WS_CHILD. Для вікон WS_CHILD
власник HWND в структурі WND дочірнього вікна дорівнює нулю, і замість нього надішле повідомлення надсилаються батьківському вікну. Наприклад, кнопка у вікні
діалогу є нащадком головного діалогового вікна. Коли ви натискаєте кнопку, вікно кнопки повідомляє про цю подію свого предка, тобто головне діалогове
вікно. Ви можете вважати, що для ws_child-okhb логічний номер hWndOwner - те ж саме, що і hWndParenfc, хоча насправді вони різні. У Presentati
on Manager немає необхідності в бітах WS_CHILD або РWS_POPUP. Заповнюється як поле hWndPa-rent,
так і поле hWndOwner. Це повністю визначає, хто отримує надішле повідомлення нащадка, а також положення вікна в ієрархії. У Presentation Manager
поля hWndParent і hWndOw-ner зазвичай містять одне і те ж значення HWND.
Крім посилки повідомлень своєму власникові, вікно, яким володіють, також завжди розташоване
попереду вікна-власника. Якщо вікно перетворено в піктограму, те саме відбувається і з вікнами, якими воно володіє. Якщо вікно-власник знищується, ТТО вікна,
якими воно володіє, також знищуються. Так як вікно не стежить за вікнами, якими воно володіє, потрібно переглядати списки покажчиків предок/сусід і порівнювати
власника кожного вікна з HWND вікна, яке знищується.
У всьому цьому трохи дивно те, що Windows не робить відношення володіння дуже явним. Хоча в
документації SDK коротко розглядається відношення володіння, вам досить важко побачити, в яких місцях відношення володіння відрізняється від ставлення
предок/нащадок. У Presentation Manager OS/2 при створенні вікна ви задаєте і батьківське вікно, і вікно-власник. У Windows, ви ставите тільки предка.
Якщо функції CreateWindow () передається тільки HWND батька, як тоді вам описати вікно
власника в Windows? Одним з параметрів функції CreateWindow () є бітова маска стилю. Якщо стиль вікна WS_CHILD, параметр hWndParent інтерпретується
як батьківське вікно. Однак, якщо ви задаєте WS_OVERLAPPED або WS_POPUP, параметр hWndParent в дійсність використовується як власник HWND, що
пізніше з'ясовується в деякому псевдокоді. Батьківським вікном для вікон WS_OVERLAPPED або WS_POPUP завжди є HWND desktop-вікна (HWndDes
ktop).
3. «Програма демонструє ієрархію вікон Windows»
p386; ця директива дозволяє транслятору обробляти команди процесора i 386
jumps; транслятор автоматично перетворить команду умовної передачі управління
; в комбінацію умовної і безумовної команди, якщо умовна в силу обмеженості; області своєї дії не забезпечує передачу
управління за потрібною адресою
model flat, STDCALL; вибирає модель пам'яті для 32-розрядного програмування і; правила передачі параметрів
функції STDCALL, далі діють за замовчуванням
UNICODE = 0
include win32.inc; файл, що містить опис структур даних і констант
; some 32-bit constants and structures
L equ; послідовності символів LARGE, що є ім'ям операції, що оголошує наступний за нею операнд 32-розрядних,
присвоюється ім'я L
Define the external functions we will be linking to
;
extrn BeginPaint: PROC ; опис імпортованих з Windows функцій
extrn CreateWindowExA: PROC
extrn DefWindowProcA: PROC
extrn DispatchMessageA: PROC
extrn EndPaint: PROC
extrn ExitProcess: PROC
extrn GetMessageA: PROC
extrn GetModuleHandleA: PROC
extrn GetStockObject: PROC
extrn InvalidateRect: PROC
extrn LoadCursorA: PROC
extrn LoadIconA: PROC
extrn MessageBeep: PROC
extrn MessageBoxA: PROC
extrn PostQuitMessage: PROC
extrn RegisterClassA: PROC
extrn ShowWindow: PROC
extrn SetWindowPos: PROC
extrn TextOutA: PROC
extrn TranslateMessage: PROC
extrn UpdateWindow: PROC
extrn FindFirstFileA: PROC
. data; зумовлене ім'я, що означає початок сегменту даних
newhwnd dd 0
lppaint PAINTSTRUCT
msg MSGSTRUCT
wc WNDCLASS
hInst dd 0
szTitleName db 'Це вікно УГТУ', 0
szTitleName1 db 'Це вікно групи СП-923', 0; 'Каркасне додаток Win32 на асемблері' .0
szClassName db 'ASMCLASS32', 0; 'Додаток Win32'
Buffer db 'Привет из Нягані!', 0
new1hwnd dd 0
MSG_L EQU 14
. code
start:
push L 0
call GetModuleHandleA; get hmod (in eax)
mov [hInst], eax; hInstance is same as HMODULE
; in the Win32 world
reg_class:
;
; initialize the WndClass structure; Іініціалізація сруктурам WndClass
;
mov [wc.clsStyle], CS_HREDRAW + CS_VREDRAW + CS_GLOBALCLASS; тип; класу
mov [wc.clsLpfnWndProc], offset WndProc; адресу віконної процедури
mov [wc.clsCbClsExtra], 0
mov [wc.clsCbWndExtra], 0
mov eax, [hInst]
mov [wc.clsHInstance], eax; дікріптор модуля
push L IDI_APPLICATION; задана за замовчуванням піктограма
push L 0
call LoadIconA
mov [wc.clsHIcon], eax
push L IDC_ARROW
push L 0
call LoadCursorA
mov [wc.clsHCursor], eax
mov [wc.clsHbrBackground], COLOR_WINDOW + 1
mov dword ptr [wc.clsLpszMenuName], 0
mov dword ptr [wc.clsLpszClassName], offset szClassName
push offset wc
call RegisterClassA
push L 0; lpParam
push [hInst]; hInstance
push L 0; menu
push L 0; parent hwnd
push L CW_USEDEFAULT; height
push L CW_USEDEFAULT; width
push L CW_USEDEFAULT; y
push L CW_USEDEFAULT; x
push L WS_OVERLAPPEDWINDOW; Style
push offset szTitleName; Title string
push offset szClassName; Class name; ім'я класу
push L 0; extra style
call CreateWindowExA
mov [newhwnd], eax
push L SW_SHOWNORMAL
push [newhwnd]
call ShowWindow
push [newhwnd]
call UpdateWindow
push L 0; lpParam
push [hInst]; hInstance
push L 0; menu
push L [newhwnd]; parent hwnd
push L CW_USEDEFAULT; height
push L CW_USEDEFAULT; width
push L CW_USEDEFAULT; y
push L CW_USEDEFAULT; x
push L WS_OVERLAPPEDWINDOW; Style
push offset szTitleName1; Title string
push offset szClassName; Class name
push L 0; extra style
call CreateWindowExA
mov [new1hwnd], eax
push L SW_SHOWNORMAL
push [new1hwnd]
call ShowWindow
push [new1hwnd]
call UpdateWindow
msg_loop:
push L 0
push L 0
push L 0
push offset msg
call GetMessageA
cmp ax, 0
je end_loop
push offset msg
call TranslateMessage
push offset msg
call DispatchMessageA
jmp msg_loop
end_loop:
push [msg.msWPARAM]
call ExitProcess
; we never get to here
; віконна процедура
;---------------------------------------------- -------------------------------
WndProc proc uses ebx edi esi, hwnd: DWORD, wmsg: DWORD,
wparam: DWORD, lparam: DWORD
;
; WARNING: Win32 requires that EBX, EDI, and ESI be preserved! We comply
; with this by listing those regs after the 'uses' statement in the 'proc'
; line. This allows the Assembler to save them for us.
;
LOCAL hDC: DWORD
cmp [wmsg], WM_DESTROY
je wmdestroy
cmp [wmsg], WM_SIZE
je wmsize
cmp [wmsg], WM_CREATE
je wmcreate
cmp [wmsg], WM_PAINT
je wmpaint
jmp defwndproc
wmcreate:
mov eax, 0
jmp finish
defwndproc:
push [lparam]
push [wparam]
push [wmsg]
push [hwnd]
call DefWindowProcA
jmp finish
wmdestroy:
push L 0
call PostQuitMessage
mov eax, 0
jmp finish
wmsize:
mov eax, 0
jmp finish
wmpaint:
push offset lppaint
push [hwnd]
call BeginPaint
mov [hDC], eax
push L 17
; push ecx
push offset Buffer
push L 5
push L 5
push [hDC]
call TextOutA
push offset lppaint
push [hwnd]
call EndPaint
mov eax, 0
jmp finish
finish:
ret
WndProc endp
;---------------------------------------------- -------------------------------
public WndProc
end start
Бібліографічний список
1. Використання Turbo Assembler при розробці програм/Укладач А.А. Чекатков. Київ: Диалектика, 1995.
2. Рихтер Д. Windows для професіоналів (програмування в Win32 API для Windows
NT 3.5 і Windows 95) пер. З англ. М.: Видавничий відділ «Російський Редакція» ТОО «Channel Trading Ltd», 1995.
3. Зубков С.В. Assembler. Для DOS, Windows і Unix. М.: ДМК. 1999.
