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位汇编教程