Programming 版 (精华区)
发信人: zhangyan (今朝有水今朝灌), 信区: Programming
标 题: Iczelion Win32汇编教程(10)
发信站: 哈工大紫丁香 (2001年02月14日16:15:13 星期三), 站内信件
第十课 以对话框为主要界面的应用程序
----------------------------------------------------------------------------
----
现在我们开始学习一些有关GUI编程的有趣的部分， 即：以对话框为主要界面的应用程
序。我们将分两课来讲述这一过程
理论：
如果您仔细关注过前一个程序就会发现：您无法按TAB键从一个子窗口控件跳到另一个子
窗口控件，要想转移的话只有 用鼠标一下一下地去点击。对用户来说这是不友好的。另
一件事是如果您象前一课中那样把主窗口的背景色从白色改成 灰色，为了子窗口控件无
缝地作相应地改变，您必须细分类所有子窗口。 造成上述诸多不便的原因是子窗口控件
本来是为对话框而设计的，象子窗口控件的背景色是灰色的，而对话框的背景色也是 灰
色的，这样它们本来就相互协调了，而无须程序员加入其他的处理。 在我们深入讨论对
话框前我们必须知道何谓对话框。一个对话框其实是有很多的子窗口控件的一个窗口，
WINDOWS在对话框 内部有一个管理程序，由其来处理象按下TAB键则输入焦点从一个子窗
口空间条到另一个子窗口控件、按下ENTER键等于在当 前具有输入焦点的子窗口控件上
点击了鼠标 等等这些杂事，这样程序员就可以集中精力于他们的逻辑事务了。对话框主
要用 作输入输出接口，人们无须知道它们内部的工作原理，而只要知道如何和他们进行
交互就可以了。这也是面向对象设计中的 所谓信息隐藏。只要这个黑盒子中的实现足够
完美，我们就可以放心地使用，当然我们必须强调的是“黑盒子”必须完美。 WIN32 A
PI 内部 的实现即是一个“黑盒子”。 噢，好象我们的讨论有些走题，现在让我们回到
正题来，对话框的设计是为了减少程序员的工作量的，一般您如果在窗口中 自己放一个
子窗口控件您就必须自己处理其中的按键逻辑和细分类它的窗口过程。如果您把它放到
对话框中，则这些杂事 对话框会自己处理，您只要知道如何获得用户输入的数据和如何
把数据放入到子窗口控件中去就可以了。 在程序中对话框和菜单一样被定义成一种资源
，您可以在脚本文件中写一个对话框模板，其中包含该对话框和子窗口的特性， 然后用
资源编辑器编辑。需要注意的是所有的资源必须放在同一个脚本文件中。 虽然可以用文
本编辑器去编辑脚本文件，但是象要调整子窗口控件位置时要涉及到一些坐标值时最好
还是用一些可视化的编 辑器，这样方便多了。一般在编译器的开发包中都会带资源编辑
器，您可以用它们来产生一个模板然后增删一些子窗口控件。 有两种主要的对话框：模
式对话框和无模式对话框。无模式对话框允许您把输入焦点切换到（同一个应用程序的
）另一个窗口，而该对话框无须关闭 。比如MS WORD 中的FIND对话框。模式对话框又有
两类：应用程序模式对话框和系统对话框。应用程序对话框不允许您在本 应用程序中切
换输入焦点，但是可以切换到其它的应用程序中去，而系统对话框则必须您对该对话框
做出响应否则不能切换到 任何的应用程序中去。要创建一个无模式对话框调用API函数
CreateDialogParam，而创建一个模式对话框则调用API函数DialogBoxParam。 其中应用
程序模式对话框和系统模式对话框之间的差别是style参数不同，要想创建一个系统模式
对话框该参数必须“或”上 DS_SYSMODAL标志位。在对话框中若要和子窗口控件通讯则
调用函数SendDlgItemMesage。该函数的语法如下：
SendDlgItemMessage proto hwndDlg:DWORD,\
idControl:DWORD,\
uMsg:DWORD,\
wParam:DWORD,\
lParam:DWORD
该PAI函数对于用在向子窗口控件发送方面是非常有用的。譬如:如果您想得到编辑控件
中的字符串可以这么做:
call SendDlgItemMessage, hDlg, ID_EDITBOX, WM_GETTEXT, 256, ADDR text_buffer
具体要发送那些消息应当查询有关的WIN32 API 参考手册。 WINDOWS 还 提供几个快速
存取控件数据的函数。譬如：GetDlgItemText、CheckDlgButton等。这样一来，您就可
以不用去查询每个消息的wParam和lParam参数获得相关信息了。您应尽可能地使用这些
API 函数，这样使得您的代码将来比较容易维护。对话框的管理函数会把一些消息发送
给一个特定的回调函数：对话框过程处理函数，该函数的格式为：
DlgProc proto hDlg:DWORD ,\
iMsg:DWORD ,\
wParam:DWORD ,\
lParam:DWORD
该函数的格式非常类似于窗口的过程函数，除了返回值是TURE和FALSE，而不是HRESULT
，存在于WINDOWS内部的对话框管理器才是对话框真正的窗口过程函数。它会把某些消息
传递给我们的窗口过程函数。所以当我们的窗口过程函数处理这些消息时就返回TTRUE，
否则就在eax中返回FALSE。这也意味着我们的窗口过程函数在接受到自己不处理的消息
时并不会调用DefWindowProc函数，因为它本身不是一个真正的窗口过程函数。对于对话
框有两种用法：一种是把它作为一个主窗口来用，一种是把它作为一种输入输出设备使
用。本课中我们将示范第一种用法。“把对话框用作主窗口”有两种意思： 1。您可以
调用RegisterClassEx函数把对话框模板注册为一个窗口类。这样该对话框的行为就类似
于一个普通的窗口了：它通过在注册窗口时指定的窗口过程来处理所有的消息，通过这
种方法来使用对话框的好处是您不需要显示地创建子窗口控件，WINDOWS本身会帮您创建
好，另外还会帮您处理所有的按键逻辑，另外您还可以指定您窗口类结构中的光标和图
标； 2。您的应用程序创建没有父窗口的对话框窗口，这种方法中，没有必要需要一段
处理消息循环的代码，因为所有的消息被直接送到对话框过程处理函数，这样您也可以
不要注册一个窗口类。本课中我门将先使用第一种方法然后使用第二中方法。
例子：
----------------------------------------------------------------------------
----
dialog.asm
----------------------------------------------------------------------------
----
.386
.model flat,stdcall
option casemap:none
WinMain proto :DWORD,:DWORD,:DWORD,:DWORD
include \masm32\include\windows.inc
include \masm32\include\user32.inc
include \masm32\include\kernel32.inc
includelib \masm32\lib\user32.lib
includelib \masm32\lib\kernel32.lib
.data
ClassName db "DLGCLASS",0
MenuName db "MyMenu",0
DlgName db "MyDialog",0
AppName db "Our First Dialog Box",0
TestString db "Wow! I'm in an edit box now",0
.data?
hInstance HINSTANCE ?
CommandLine LPSTR ?
buffer db 512 dup(?)
.const
IDC_EDIT equ 3000
IDC_BUTTON equ 3001
IDC_EXIT equ 3002
IDM_GETTEXT equ 32000
IDM_CLEAR equ 32001
IDM_EXIT equ 32002
.code
start:
invoke GetModuleHandle, NULL
mov hInstance,eax
invoke GetCommandLine
mov CommandLine,eax
invoke WinMain, hInstance,NULL,CommandLine, SW_SHOWDEFAULT
invoke ExitProcess,eax
WinMain proc hInst:HINSTANCE,hPrevInst:HINSTANCE,CmdLine:LPSTR,CmdShow:DWORD
LOCAL wc:WNDCLASSEX
LOCAL msg:MSG
LOCAL hDlg:HWND
mov wc.cbSize,SIZEOF WNDCLASSEX
mov wc.style, CS_HREDRAW or CS_VREDRAW
mov wc.lpfnWndProc, OFFSET WndProc
mov wc.cbClsExtra,NULL
mov wc.cbWndExtra,DLGWINDOWEXTRA
push hInst
pop wc.hInstance
mov wc.hbrBackground,COLOR_BTNFACE+1
mov wc.lpszMenuName,OFFSET MenuName
mov wc.lpszClassName,OFFSET ClassName
invoke LoadIcon,NULL,IDI_APPLICATION
mov wc.hIcon,eax
mov wc.hIconSm,eax
invoke LoadCursor,NULL,IDC_ARROW
mov wc.hCursor,eax
invoke RegisterClassEx, addr wc
invoke CreateDialogParam,hInstance,ADDR DlgName,NULL,NULL,NULL
mov hDlg,eax
invoke ShowWindow, hDlg,SW_SHOWNORMAL
invoke UpdateWindow, hDlg
invoke GetDlgItem,hDlg,IDC_EDIT
invoke SetFocus,eax
.WHILE TRUE
invoke GetMessage, ADDR msg,NULL,0,0
.BREAK .IF (!eax)
invoke IsDialogMessage, hDlg, ADDR msg
.IF eax ==FALSE
invoke TranslateMessage, ADDR msg
invoke DispatchMessage, ADDR msg
.ENDIF
.ENDW
mov eax,msg.wParam
ret
WinMain endp
WndProc proc hWnd:HWND, uMsg:UINT, wParam:WPARAM, lParam:LPARAM
.IF uMsg==WM_DESTROY
invoke PostQuitMessage,NULL
.ELSEIF uMsg==WM_COMMAND
mov eax,wParam
.IF lParam==0
.IF ax==IDM_GETTEXT
invoke GetDlgItemText,hWnd,IDC_EDIT,ADDR buffer,512
invoke MessageBox,NULL,ADDR buffer,ADDR AppName,MB_OK
.ELSEIF ax==IDM_CLEAR
invoke SetDlgItemText,hWnd,IDC_EDIT,NULL
.ELSE
invoke DestroyWindow,hWnd
.ENDIF
.ELSE
mov edx,wParam
shr edx,16
.IF dx==BN_CLICKED
.IF ax==IDC_BUTTON
invoke SetDlgItemText,hWnd,IDC_EDIT,ADDR TestString
.ELSEIF ax==IDC_EXIT
invoke SendMessage,hWnd,WM_COMMAND,IDM_EXIT,0
.ENDIF
.ENDIF
.ENDIF
.ELSE
invoke DefWindowProc,hWnd,uMsg,wParam,lParam
ret
.ENDIF
xor eax,eax
ret
WndProc endp
end start
----------------------------------------------------------------------------
----
Dialog.rc
----------------------------------------------------------------------------
----
#include "resource.h"
#define IDC_EDIT 3000
#define IDC_BUTTON 3001
#define IDC_EXIT 3002
#define IDM_GETTEXT 32000
#define IDM_CLEAR 32001
#define IDM_EXIT 32003
MyDialog DIALOG 10, 10, 205, 60
STYLE 0x0004 | DS_CENTER | WS_CAPTION | WS_MINIMIZEBOX |
WS_SYSMENU | WS_VISIBLE | WS_OVERLAPPED | DS_MODALFRAME | DS_3DLOOK
CAPTION "Our First Dialog Box"
CLASS "DLGCLASS"
BEGIN
EDITTEXT IDC_EDIT, 15,17,111,13, ES_AUTOHSCROLL | ES_LEFT
DEFPUSHBUTTON "Say Hello", IDC_BUTTON, 141,10,52,13
PUSHBUTTON "E&xit", IDC_EXIT, 141,26,52,13, WS_GROUP
END
MyMenu MENU
BEGIN
POPUP "Test Controls"
BEGIN
MENUITEM "Get Text", IDM_GETTEXT
MENUITEM "Clear Text", IDM_CLEAR
MENUITEM "", , 0x0800 /*MFT_SEPARATOR*/
MENUITEM "E&xit", IDM_EXIT
END
END
分析：
我们先来分析第一个例子：
该例显示了如何把一个对话框模板注册成一个窗口类，然后创建一个由该窗口类派生的
窗口。由于您没有必要自己去创建子窗口控件，所以就简化了许多的工作。
我们先来分析对话框模板。
MyDialog DIALOG 10, 10, 205, 60
先是对话框的名字，然后是关键字“DAILOG”。接下来的四个数字中，前两个是对话框
的坐标，后两个是对话框的宽和高（注意：它们的单位是对话框的单位，而不一定是像
素点）。
STYLE 0x0004 | DS_CENTER | WS_CAPTION | WS_MINIMIZEBOX |
WS_SYSMENU | WS_VISIBLE | WS_OVERLAPPED | DS_MODALFRAME | DS_3DLOOK
上面定义了对话框的风格。
CAPTION "Our First Dialog Box"
这是显示在对话框标题条上的标题。
CLASS "DLGCLASS"
这一行非常关键。正是有了关键字CLASS，我们才可以用它来声明把一个对话框当成一个
窗口来用。跟在关键字后面的是“窗口类”的名称。
BEGIN
EDITTEXT IDC_EDIT, 15,17,111,13, ES_AUTOHSCROLL | ES_LEFT
DEFPUSHBUTTON "Say Hello", IDC_BUTTON, 141,10,52,13
PUSHBUTTON "E&xit", IDC_EXIT, 141,26,52,13
END
上面的一块定义了对话框中的子窗口控件，它们是声明在一头一尾的两个关键字BEGIN和
END之间的。
control-type "text" ,controlID, x, y, width, height [,styles]
控件的类型是资源编辑器定义好了的常数，您可以查找有关的手册。
现在我们来看看汇编源代码。先看这部分：
mov wc.cbWndExtra,DLGWINDOWEXTRA
mov wc.lpszClassName,OFFSET ClassName
通常cbWndExtra被设成NULL，但我们想把一个对话框模板注册成一个窗口类，我们必须
把该成员的值设成DLGWINDOWEXTRA。注意类的名称必须和模板中跟在CLASS关键字后面的
名称一样。余下的成员变量和声明一般的窗口类相同。填写好窗口类结构变量后调用函
数RegisterClassEx进行注册。看上去这一切和注册一个普通的窗口类是一样的。
invoke CreateDialogParam,hInstance,ADDR DlgName,NULL,NULL,NULL
注册完毕后，我们就创建该对话框。在这个例子中，我们调用函数CreateDialogParam产
生一个无模式对话框。这个函数共有5个参数，其中前两个参数是必须的：实例句柄和指
向对话框模板名称的指针。注意第二个参数是指向模板名称而不是类名称的指针。这时
，WINDOWS将产生对话框和子控件窗口。同时您的应用程序将接收到由WINDOWS传送的第
一个消息WM_CREATE。
invoke GetDlgItem,hDlg,IDC_EDIT
invoke SetFocus,eax
在对话框产生后，我们把输入输出焦点设到编辑控件上。如果在WM_CREATE消息处理段中
假如设置焦点的代码，GetDlgItem函数就会失败，因为此时空间窗口还未产生，为了在
对话框和所有的子窗口控件都产生后调用该函数我们把它安排到了函数UpdatWindow后，
GetDlgItem函数返回该控件的敞口句柄。
invoke IsDialogMessage, hDlg, ADDR msg
.IF eax ==FALSE
invoke TranslateMessage, ADDR msg
invoke DispatchMessage, ADDR msg
.ENDIF
现在程序进入消息循环，在我们翻译和派发消息前，该函数使得对话框内置的对话框管
理程序来处理有关的键盘跳转逻辑。如果该函数返回TRUE，则表示消息是传给对话框的
已经由该函数处理了。注意和前一课不同，当我们想得到控件的文本信息时调用GetDlg
ItemText函数而不是GetWindowText函数，前者接受的参数是一个控件的ID 号，而不是
窗口的句柄，这使得在对话框中调用该函数更方便。
----------------------------------------------------------------------------
----
好我们现在使用第二种方法把一个对话框当成一个主窗口来使用。在接下来的例子中，
我们将产生一个应用程序的模式对话框，您将会发现其中根本没有消息循环或窗口处理
过程，因为它们根本没有必要！
----------------------------------------------------------------------------
----
dialog.asm (part 2)
----------------------------------------------------------------------------
----
.386
.model flat,stdcall
option casemap:none
DlgProc proto :DWORD,:DWORD,:DWORD,:DWORD
include \masm32\include\windows.inc
include \masm32\include\user32.inc
include \masm32\include\kernel32.inc
includelib \masm32\lib\user32.lib
includelib \masm32\lib\kernel32.lib
.data
DlgName db "MyDialog",0
AppName db "Our Second Dialog Box",0
TestString db "Wow! I'm in an edit box now",0
.data?
hInstance HINSTANCE ?
CommandLine LPSTR ?
buffer db 512 dup(?)
.const
IDC_EDIT equ 3000
IDC_BUTTON equ 3001
IDC_EXIT equ 3002
IDM_GETTEXT equ 32000
IDM_CLEAR equ 32001
IDM_EXIT equ 32002
.code
start:
invoke GetModuleHandle, NULL
mov hInstance,eax
invoke DialogBoxParam, hInstance, ADDR DlgName,NULL, addr DlgProc, NULL
invoke ExitProcess,eax
DlgProc proc hWnd:HWND, uMsg:UINT, wParam:WPARAM, lParam:LPARAM
.IF uMsg==WM_INITDIALOG
invoke GetDlgItem, hWnd,IDC_EDIT
invoke SetFocus,eax
.ELSEIF uMsg==WM_CLOSE
invoke SendMessage,hWnd,WM_COMMAND,IDM_EXIT,0
.ELSEIF uMsg==WM_COMMAND
mov eax,wParam
.IF lParam==0
.IF ax==IDM_GETTEXT
invoke GetDlgItemText,hWnd,IDC_EDIT,ADDR buffer,512
invoke MessageBox,NULL,ADDR buffer,ADDR AppName,MB_OK
.ELSEIF ax==IDM_CLEAR
invoke SetDlgItemText,hWnd,IDC_EDIT,NULL
.ELSEIF ax==IDM_EXIT
invoke EndDialog, hWnd,NULL
.ENDIF
.ELSE
mov edx,wParam
shr edx,16
.if dx==BN_CLICKED
.IF ax==IDC_BUTTON
invoke SetDlgItemText,hWnd,IDC_EDIT,ADDR TestString
.ELSEIF ax==IDC_EXIT
invoke SendMessage,hWnd,WM_COMMAND,IDM_EXIT,0
.ENDIF
.ENDIF
.ENDIF
.ELSE
mov eax,FALSE
ret
.ENDIF
mov eax,TRUE
ret
DlgProc endp
end start
----------------------------------------------------------------------------
----
dialog.rc (part 2)
----------------------------------------------------------------------------
----
#include "resource.h"
#define IDC_EDIT 3000
#define IDC_BUTTON 3001
#define IDC_EXIT 3002
#define IDR_MENU1 3003
#define IDM_GETTEXT 32000
#define IDM_CLEAR 32001
#define IDM_EXIT 32003
MyDialog DIALOG 10, 10, 205, 60
STYLE 0x0004 | DS_CENTER | WS_CAPTION | WS_MINIMIZEBOX |
WS_SYSMENU | WS_VISIBLE | WS_OVERLAPPED | DS_MODALFRAME | DS_3DLOOK
CAPTION "Our Second Dialog Box"
MENU IDR_MENU1
BEGIN
EDITTEXT IDC_EDIT, 15,17,111,13, ES_AUTOHSCROLL | ES_LEFT
DEFPUSHBUTTON "Say Hello", IDC_BUTTON, 141,10,52,13
PUSHBUTTON "E&xit", IDC_EXIT, 141,26,52,13
END
IDR_MENU1 MENU
BEGIN
POPUP "Test Controls"
BEGIN
MENUITEM "Get Text", IDM_GETTEXT
MENUITEM "Clear Text", IDM_CLEAR
MENUITEM "", , 0x0800 /*MFT_SEPARATOR*/
MENUITEM "E&xit", IDM_EXIT
END
END
----------------------------------------------------------------------------
----
分析如下：
DlgProc proto :DWORD,:DWORD,:DWORD,:DWORD
我们已经定义了DlgProc函数的原型，所以可以用操作符ADDR来获得它的地址（记得吗，
它可以在运行时动态地获得标识符的有效地址）：
invoke DialogBoxParam, hInstance, ADDR DlgName,NULL, addr DlgProc, NULL
上面的几行调用了函数DialogBoxPAram，该函数有五个参数，分别是：实例句柄、对话
框模板的名字、父窗口的句柄、对话框过程函数的地址、和对话框相关的数据。该函数
产生一个模式对话框。如果不显示地关闭该函数不会返回。
.IF uMsg==WM_INITDIALOG
invoke GetDlgItem, hWnd,IDC_EDIT
invoke SetFocus,eax
.ELSEIF uMsg==WM_CLOSE
invoke SendMessage,hWnd,WM_COMMAND,IDM_EXIT,0
除了不处理WM_CREATE消息外对话框的窗口处理过程函数和一般的窗口处理过程相似。该
过程函数接收到的第一个消息是WM_INITDIALOG。通常把初始化的代码放到此处。注意如
果您处理该消息必须在eax中返回TRUE。内置的对话框管理函数不会把WM_DESTROY 消息
发送到对话框的消息处理函数，所以如果我们想在对话框关闭时进行处理，就把它放到
WM_CLOSE消息的处理中。在我们的例子中我们发送消息WM_COMMAND，并在参数wParam中
放置IDM_EXIT，这和处理WM_CLOSE 消息效果一样，在处理IDM_EXIT 中我们调用EndDia
log函数。如果我们想要销毁一个对话框，必须调用EndDialog函数，该函数并不会立即
销毁一个窗口，而是设置一个标志位，然后对话框管理器会处理接下去的销毁对话框动
作。好，现在我们来看看资源文件，其中最显著的变化是在指定菜单时我们不是用字符
串指定该菜单的名称而是用了一个常量 IDR_MENU1。在调用DialogBoxParam产生的对话
框中挂接一个菜单必须这么做，注意在该对话框模板中，在该标识符前必须加MENU关键
字，这两个例子中的显著不同是后者没有图标，这可以在处理WM_INITDIALOG中发送消息
WM_SETICON消息，然后在该消息处理代码中作适当的处理即可。
--
Take it slow, Set it couse, Make it happen.
※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 202.97.235.21]
Powered by KBS BBS 2.0 (http://dev.kcn.cn)
页面执行时间：211.100毫秒