Пример 1. Программа работы с диалогом.

Файл, содержащий текст приложения, dlg.asm.

IDEAL.

P586.

RADIX 16.

MODEL FLAT.

%NOINCL.

%NOLIST.

Include "winconst.inc" ; API Win32 consts.

Include "winptype.inc" ; API Win32 functions prototype.

Include "winprocs.inc" ; API Win32 function.

Include "resource.inc" ; resource consts.

MAX_USER_NAME = 20.

DataSeg.

SzAppName db 'Demo 1', 0.

SzHello db 'Hello, '.

SzUser db MAX_USER_NAME dup (0).

CodeSeg.

Start: call GetModuleHandleA, 0.

Call DialogBoxParamA, eax, IDD_DIALOG, 0, offset DlgProc, 0.

Cmp eax,IDOK.

Jne bye.

Call MessageBoxA, 0, offset szHello, \

Offset szAppName, \

MB_OK or MB_ICONINFORMATION.

Bye: call ExitProcess, 0.

Public stdcall DlgProc.

Proc DlgProc stdcall.

Arg @@hDlg :dword, @@iMsg :dword, @@wPar :dword, @@lPar :dword.

Mov eax,[@@iMsg].

Cmp eax,WM_INITDIALOG.

Je @@init.

Cmp eax,WM_COMMAND.

Jne @@ret_false.

Mov eax,[@@wPar].

Cmp eax,IDCANCEL.

Je @@cancel.

Cmp eax,IDOK.

Jne @@ret_false.

Call GetDlgItemTextA, @@hDlg, IDR_NAME, \

Offset szUser, MAX_USER_NAME.

Mov eax,IDOK.

@@cancel: call EndDialog, @@hDlg, eax.

@@ret_false: xor eax,eax.

Ret.

@@init: call GetDlgItem, @@hDlg, IDR_NAME.

Call SetFocus, eax.

Jmp @@ret_false.

Endp DlgProc.

End Start.

Файл ресурсов dlg.rc.

#include "resource.h".

IDD_DIALOG DIALOGEX 0, 0, 187, 95.

STYLE DS_MODALFRAME | DS_3DLOOK | WS_POPUP | WS_CAPTION | WS_SYSMENU.

EXSTYLE WS_EX_CLIENTEDGE.

CAPTION "Dialog".

FONT 8, "MS Sans Serif".

BEGIN.

DEFPUSHBUTTON "OK",IDOK,134,76,50,14.

PUSHBUTTON "Cancel",IDCANCEL,73,76,50,14.

LTEXT "Type your name",IDC_STATIC,4,36,52,8.

EDITTEXT IDR_NAME,72,32,112,14,ES_AUTOHSCROLL.

END.

Остальные файлы из данного примера, приведены в приложении 1.

Краткие комментарии к программе.

Сразу после метки Start, программа обращается к функции API Win32 GetModuleHandle для получения handle данного модуля (данный параметр чаще именуют как handle of instance). Получив handle, мы вызываем диалог, созданный либо вручную, либо с помощью какой-либо программы построителя ресурсов. Далее программа проверяет результат работы диалогового окна. Если пользователь вышел из диалога посредством нажатия клавиши OK, то приложение запускает MessageBox с текстом приветствия.

Диалоговая процедура обрабатывает следующие сообщения. При инициализации диалога (WM_INITDIALOG) она просит Windows установить фокус на поле ввода имени пользователя. Сообщение WM_COMMAND обрабатывается в таком порядке: делается проверка на код нажатия клавиши. Если была нажата клавиша OK, то пользовательский ввод копируется в переменную szValue, если же была нажата клавиша Cancel, то копирования не производится. Но и в том и другом случае вызывается функция окончания диалога: EndDialog. Остальные сообщения в группе WM_COMMAND просто игнорируются, предоставляя Windows действовать по умолчанию.

Вы можете сравнить приведённую программу с аналогичной программой, написанной на ЯВУ, разница в написании будет незначительна. Очевидно те, кто писал приложения на ассемблере под Windows 3.x, отметят тот факт, что исчезла необходимость в сложном и громоздком startup коде. Теперь приложение выглядит более просто и естественно.