Win32汇编---对话框资源的综合应用

这个实验中基本上把改用的对话框资源都用上了，GROUPBOX, AUTOCHECKBOX,COMBOBOX,EDITTEXT,TEXT,SCROLLBAR,PUSHBUTTON...一开始对于控件的位置可能把握不好，但是我想先把一些基本组件的特征写出来，位置，大小都设置为0，保存为RC文件，然后用编译成RES文件，用VC++6.0来编辑这些控件，把位置，大小都弄成合适的大小，保存。也可以另存为一份RC文件，里面把位置，大小的数值都列出来了~~

资源文件Control.rc源代码如下：

//<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
#include        <resource.h>
//<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
#define ICO_MAIN        0x1000
#define DLG_MAIN        1
#define IDB_1           1
#define IDB_2           2
#define IDC_ONTOP       101
#define IDC_SHOWBMP     102
#define IDC_ALOWCHG     103
#define IDC_MODALFRAME  104
#define IDC_THICKFRAME  105
#define IDC_TITLETEXT   106
#define IDC_CUSTOMTEXT  107
#define IDC_BMP         108
#define IDC_SCROLL      109
#define IDC_SBVALUE     110
//<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
ICO_MAIN        ICON    "Main.ico"
IDB_1           BITMAP  "Picture1.bmp"
IDB_2           BITMAP  "Picture2.bmp"
//<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
DLG_MAIN DIALOG 150, 200, 325, 140
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | WS_THICKFRAME
CAPTION "对话框空间示例"
FONT 9, "宋体"
BEGIN
GROUPBOX            "选项", -1, 64, 8, 122, 101
AUTOCHECKBOX        "总在最前", IDC_ONTOP, 74, 23, 100, 8
AUTOCHECKBOX        "显示图片", IDC_SHOWBMP, 74, 41, 100, 10
AUTOCHECKBOX        "允许更换图片", IDC_ALOWCHG, 74, 58, 100, 11
CONTROL             "", -1, "Static", SS_ETCHEDHORZ | WS_VISIBLE | WS_CHILD, 72, 71, 102, 1
AUTORADIOBUTTON     "模态边框(&Modal Frame)", IDC_MODALFRAME, 74, 78, 100, 10, WS_TABSTOP
AUTORADIOBUTTON     "可变边框(&Thick Frame)", IDC_THICKFRAME, 74, 92, 72, 10, WS_TABSTOP

GROUPBOX            "标题文字", -1, 201, 8, 123, 101
COMBOBOX            IDC_TITLETEXT, 208, 23, 102, 70, CBS_DROPDOWNLIST | WS_TABSTOP
LTEXT               "自定义文字: ", -1, 208, 43, 98, 9
EDITTEXT            IDC_CUSTOMTEXT, 208, 56, 101, 14
LTEXT               "请在此选择显示在标题栏上面的文字，或者选择“自定义”后自行输入", -1, 208,75,105,26, WS_BORDER
CONTROL             "", -1, "Static", SS_ETCHEDHORZ | WS_VISIBLE | WS_CHILD, 0, 115, 325, 1
DEFPUSHBUTTON       "更换图片(&C)", IDOK, 175, 120, 63, 14
PUSHBUTTON          "退出(&X)", IDCANCEL, 252, 120, 62, 14
CONTROL             IDB_1, IDC_BMP, "Static", SS_BITMAP | WS_VISIBLE | WS_CHILD, 11, 8, 43, 100
SCROLLBAR           IDC_SCROLL, 9, 122, 122, 12
LTEXT               "0", IDC_SBVALUE, 138, 124, 34, 10
END

对于功能函数，对于此例子也学会了对话框的基本性质，以及如何去把握窗口的风格，DS_MODALFRAME 和 WS_THICKFRAME分别可以控制窗口大小是否可变。

所有控件中，对于SCROLLBAR的控制略显复杂。垂直滚动条发送WM_VSCROLL，水平的则发送WM_HSCROLL消息，对于这两种消息的处理则是大同小异，传参细节如下：

wParam低16位是nScrollCode ;动作码

wParam高16位是nPos ;滚动条当前位置

lParam = hwndScrollCode ;滚动条控件当前句柄

这些大家都可以在MSDN上更详细的看到

Control.asm源代码如下：

;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
.386
.model  flat, stdcall
option  casemap :none

include         windows.inc
include         user32.inc
includelib      user32.lib
include         kernel32.inc
includelib      kernel32.lib
include         gdi32.inc
includelib      gdi32.lib
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
ICO_MAIN        equ     1000h   ;图标
DLG_MAIN        equ     1
IDB_1           equ     1
IDB_2           equ     2
IDC_ONTOP       equ     101
IDC_SHOWBMP     equ     102
IDC_ALOW        equ     103
IDC_MODALFRAME  equ     104
IDC_THICKFRAME  equ     105
IDC_TITLETEXT   equ     106
IDC_CUSTOMTEXT  equ     107
IDC_BMP         equ     108
IDC_SCROLL      equ     109
IDC_VALUE       equ     110
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
.data?
hInstance       dd      ?
hBmp1           dd      ?
hBmp2           dd      ?
dwPos           dd      ?
.const
szText1         db      "Hello, world!",0
szText2         db      "Win32 Assumbly!",0
szText3         db      "自定义",0
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
.code
_ProcDlgMain    proc    uses ebx edi esi hWnd, uMsg, wParam, lParam
local   @szBuffer[126]:BYTE

.if     uMsg == WM_CLOSE
invoke  EndDialog,hWnd,NULL
invoke  DeleteObject,hBmp1
invoke  DeleteObject,hBmp2
.elseif uMsg == WM_INITDIALOG
;====================================设置标题栏图标
invoke  LoadIcon,hInstance,ICO_MAIN
invoke  SendMessage,hWnd,WM_SETICON,ICON_BIG,eax
;====================================初始化组合框
invoke  SendDlgItemMessage,hWnd,IDC_TITLETEXT,CB_ADDSTRING,0,addr szText1
invoke  SendDlgItemMessage,hWnd,IDC_TITLETEXT,CB_ADDSTRING,0,addr szText2
invoke  SendDlgItemMessage,hWnd,IDC_TITLETEXT,CB_ADDSTRING,0,addr szText3
invoke  SendDlgItemMessage,hWnd,IDC_TITLETEXT,CB_SETCURSEL,0,0
invoke  GetDlgItem,hWnd,IDC_CUSTOMTEXT
invoke  EnableWindow,eax,FALSE
invoke  LoadBitmap,hInstance,IDB_1
mov     hBmp1,eax
invoke  LoadBitmap,hInstance,IDB_2
mov     hBmp2,eax
;====================================初始化单选钮和复选框
invoke  CheckDlgButton,hWnd,IDC_SHOWBMP,BST_CHECKED
invoke  CheckDlgButton,hWnd,IDC_ALOW,BST_CHECKED
invoke  CheckDlgButton,hWnd,IDC_THICKFRAME,BST_CHECKED
;====================================初始化滚动条
invoke  SendDlgItemMessage,hWnd,IDC_SCROLL,SBM_SETRANGE,0,100

.elseif uMsg == WM_COMMAND
mov     eax,wParam
.if     ax  ==  IDCANCEL
invoke  EndDialog,hWnd,NULL
invoke  DeleteObject,hBmp1
invoke  DeleteObject,hBmp2
;====================================更换图片
.elseif ax  ==  IDOK
mov     eax,hBmp1
xchg    eax,hBmp2
mov     hBmp1,eax
invoke  SendDlgItemMessage,hWnd,IDC_BMP,STM_SETIMAGE,IMAGE_BITMAP,eax
;===================================="总在最前"
.elseif ax  ==  IDC_ONTOP
invoke  IsDlgButtonChecked,hWnd,IDC_ONTOP
.if     eax ==  BST_CHECKED
invoke  SetWindowPos,hWnd,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE or SWP_NOSIZE
.else
invoke  SetWindowPos,hWnd,HWND_NOTOPMOST,0,0,0,0,SWP_NOMOVE or SWP_NOSIZE
.endif
;====================================显示或隐藏图片
.elseif ax  ==  IDC_SHOWBMP
invoke  GetDlgItem,hWnd,IDC_BMP
mov     ebx,eax
invoke  IsWindowVisible,ebx
.if     eax
invoke  ShowWindow,ebx,SW_HIDE
.else
invoke  ShowWindow,ebx,SW_SHOW
.endif
;===================================允许和灰化"更换图片"按钮
.elseif ax  ==  IDC_ALOW
invoke  IsDlgButtonChecked,hWnd,IDC_ALOW
.if     eax ==  BST_CHECKED
mov     ebx,TRUE
.else
xor     ebx,ebx
.endif
invoke  GetDlgItem,hWnd,IDOK
invoke  EnableWindow,eax,ebx
;=================================="模态边框" 还是 "可变边框"
.elseif ax  ==  IDC_MODALFRAME
invoke  GetWindowLong,hWnd,GWL_STYLE
and     eax,not WS_THICKFRAME
invoke  SetWindowLong,hWnd,GWL_STYLE,eax
.elseif ax  ==  IDC_THICKFRAME
invoke  GetWindowLong,hWnd,GWL_STYLE
or      eax,WS_THICKFRAME
invoke  SetWindowLong,hWnd,GWL_STYLE,eax
;==================================处理下拉式组合框
.elseif ax  ==  IDC_TITLETEXT
shr     eax,16
.if     ax  ==  CBN_SELENDOK
invoke  SendDlgItemMessage,hWnd,IDC_TITLETEXT,CB_GETCURSEL,0,0
.if     eax ==  2
invoke  GetDlgItem,hWnd,IDC_CUSTOMTEXT
invoke  EnableWindow,eax,TRUE
.else
mov     ebx,eax
invoke  SendDlgItemMessage,hWnd,IDC_TITLETEXT,/
CB_GETLBTEXT,ebx,addr @szBuffer
invoke  SetWindowText,hWnd,addr @szBuffer
invoke  GetDlgItem,hWnd,IDC_CUSTOMTEXT
invoke  EnableWindow,eax,FALSE
.endif
.endif
;=================================在文本框输入文字
.elseif ax  ==  IDC_CUSTOMTEXT
invoke  GetDlgItemText,hWnd,IDC_CUSTOMTEXT,addr @szBuffer,sizeof @szBuffer
invoke  SetWindowText,hWnd,addr @szBuffer
.endif
;==========================处理滚动条信息
.elseif uMsg == WM_HSCROLL
mov     eax,wParam
.if     ax  ==  SB_LINELEFT
dec     dwPos
.elseif ax  ==  SB_LINERIGHT
inc     dwPos
.elseif ax  ==  SB_PAGELEFT
sub     dwPos,10
.elseif ax  ==  SB_PAGERIGHT
add     dwPos,10
.elseif ax  ==  SB_THUMBPOSITION || ax == SB_THUMBTRACK ;******
mov     eax,wParam
shr     eax,16
mov     dwPos,eax
.else
mov     eax,TRUE
ret
.endif
cmp     dwPos,0
jge     @F
mov     dwPos,0
@@:
cmp     dwPos,100
jle     @F
mov     dwPos,100
@@:
invoke  SetDlgItemInt,hWnd,IDC_VALUE,dwPos,FALSE
invoke  SendDlgItemMessage,hWnd,IDC_SCROLL,SBM_SETPOS,dwPos,TRUE ;TRUE表示重绘
.else
mov     eax,FALSE
ret
.endif
mov     eax,TRUE
ret

_ProcDlgMain    endp
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
start:
invoke  GetModuleHandle,NULL
mov     hInstance,eax
invoke  DialogBoxParam,hInstance,DLG_MAIN,NULL,addr _ProcDlgMain,NULL
invoke  ExitProcess,NULL
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
end     start

注释基本上都写上去了，这个实验本也没有什么技术含量，寒假在家没事的时候做了两遍，出于纪念意义还是贴上去吧！由于图片上传功能暂时关闭，等有时间再把图片贴上去吧

参考文献：罗云彬的windows下32位汇编教程