【学习笔记】列表框列子
恶搞源代码中。搞好了放上来:lol;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; 好长的.IF嵌套,搞了半天脑子晕了,没加入那些勾选框判断代码！
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
.386
.model flat, stdcall
option casemap :none
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; Include 文件定义
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
includewindows.inc
includeuser32.inc
includelib user32.lib
includekernel32.inc
includelib kernel32.lib
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; Equ 等值定义
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
ICO_MAIN equ 1000h ;图标
DLG_MAIN equ 2000h ;对话框资源
IDC_LISTBOX1 equ 101
IDC_LISTBOX2 equ 102
IDC_SEL1equ 103
IDC_RESET equ 104
IDC_ALLequ 105
IDC_EditT equ 106
IDC_Send equ 107
IDC_CHK1 equ 201
IDC_CHK2 equ 202
IDC_CHK3 equ 203
IDC_CHK4 equ 204
IDC_CHK5 equ 205
IDC_CHK6 equ 206
IDC_CHK7 equ 207
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; 数据段
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
.data?
hInstance dd ?
.const
szText1db '项目1',0
szText2db '项目2',0
szText3db '项目3',0
szText4db '项目4',0
szText5db '项目5',0
szPathdb 'C:\*.*',0
szMessage db '选择结果：%s',0
szTitledb '您的选择',0
szSelectdb '您选择了以下的项目：'
szReturndb 0dh,0ah,0
szErrdb '错误：选则项目不存在！',0
szQuitdb '是否退出？',0
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; 代码段
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
.code
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
_ProcDlgMain proc uses ebx edi esi hWnd,wMsg,wParam,lParam
LOCAL @szPath:byte
LOCAL @szBuffer:byte
LOCAL @szBuffer1:byte
LOCAL @szTextBuff:byte
LOCAL @dwCount
mov eax,wMsg
.if eax == WM_CLOSE ;关闭对话框窗口所作操作
invoke EndDialog,hWnd,NULL ;结束对话框窗口
.elseif eax == WM_INITDIALOG ;在对话框窗口还没有显现出来就处理的消息
;******************************************************************************************************************************
; 初始化图标
;******************************************************************************************************************************
invoke LoadIcon,hInstance,ICO_MAIN ;载入图标返回句柄
invoke SendMessage,hWnd,WM_SETICON,ICON_BIG,eax ;发送消息到对话框过程来设置菜单图标
;******************************************************************************************************************************
; 初始化代码框
;******************************************************************************************************************************
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX1,LB_ADDSTRING,0,addr szText1 ;添加字符串,返回值eax为索引值
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX1,LB_ADDSTRING,0,addr szText2
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX1,LB_ADDSTRING,0,addr szText3
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX1,LB_ADDSTRING,0,addr szText4
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX1,LB_ADDSTRING,0,addr szText5
invoke SendDlgItemMessage,hWnd,IDC_EditT,WM_SETTEXT,0,offset szPath
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX2,LB_DIR,DDL_ARCHIVE,addr szPath
;将文件排列出来放置列表框供选择！
;LB_DIR：将指定目录中的文件名自动列出并加入列表框中
;DDL_ARCHIVE ：加入归档属性
;DDL_DIRECTORY ：加入目录
;DDL_DRIVES ：加入驱动器名
;DDL_HIDDEN ：包含隐藏文件
;DDL_READONLY ：包含只读文件
;DDL_READWRITE ：包含可读写文件
;DDL_SYSTEM ：包含系统文件
;lParam：文件名通配符
;******************************************************************************************************************************
; 取多选的列表框项目
;******************************************************************************************************************************
.elseif eax == WM_COMMAND
mov eax,wParam ;wParam存储了菜单命令
.if eax == IDOK ;如果按下了OK按钮
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX2,LB_GETSELCOUNT,0,0
;LB_GETSELCOUNT ：返回多选列表框中选中的项目总数
;lParam和wParam为NULL
.if eax==0
invoke MessageBox,hWnd,offset szErr,offset szTitle,MB_OK
ret
.endif
mov @dwCount,eax ;存储了列表框2选中的项目总数
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX2,LB_GETSELITEMS,32,addr @szBuffer
;LB_GETSELITEMS ：返回多选框选中列表索引到缓冲区
;lParam：缓冲区地址
;wParam：最大项数
invoke lstrcpy,addr @szTextBuff,addr szSelect ;szSelect 字符串：您选择了以下的项目：
;lstrcpy：该函数复制一个字符串到缓冲区
;参数1：指向接收由参数2指向字符串内容的缓冲区,缓冲区必须足够大来容纳字符串,还包括最后的NULL终止符
;参数2：指向待复制的以NULL为终止符的字符串
lea esi,@szBuffer
;@szBuffer ：多选框选中列表索引
.while @dwCount
;@dwCount ：列表框2选中项目总数
lodsd
; ：传送双字
;lodsd ：把esi寄存器数值按双字装入eax中
lea ecx,@szBuffer1
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX2,LB_GETTEXT,eax,ecx
;LB_GETTEXT ：返回某个项目的字符串
;lParam：缓冲区地址
;wParam：位置索引
invoke lstrcat,addr @szTextBuff,addr szReturn
;lstrcat：该函数将一个字符串附加在另外一个字符串后面
;lpString1 ：一个以NULL为终止符字符串指针,这个缓冲区必须足够大能包含两个字符串
;lpString2 ：一个以NULL为终止符字符串指针,它将追加在由lpString1中指定,这个缓冲区必须足够大能包含两个字符串
;返回值：若函数运行成功返回值指向缓冲区、若失败,则返回值为NULL
invoke lstrcat,addr @szTextBuff,addr @szBuffer1
dec @dwCount
.endw
invoke MessageBox,hWnd,addr @szTextBuff,addr szTitle,MB_OK ;弹出消息框,所有的字符串组合后。
.elseif ax == IDCANCEL
invoke MessageBox,hWnd,offset szQuit,offset szQuit,MB_YESNO
.if eax == IDYES
invoke EndDialog,hWnd,NULL
.endif
.elseif ax == IDC_RESET ;按下按钮【复位】
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX2,LB_SETSEL,FALSE,-1
;LB_SETSEL ：在多选框中将一个项目选中或清除
;wParam：选择状态
;lParam：位置索引
.elseif ax == IDC_ALL
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX2,LB_GETCOUNT,0,0
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX2,LB_SELITEMRANGE,TRUE,eax
.elseif ax == IDC_LISTBOX1
shr eax,16
.if ax == LBN_SELCHANGE ;选定状态改变
;******************************************************************************************************************************
; 将鼠标点击结果显示在文本框中
;******************************************************************************************************************************
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX1,LB_GETCURSEL,0,0
;获取单选框中选定状态的项目索引
lea ecx,@szBuffer
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX1,LB_GETTEXT,eax,ecx
;获取文本信息放置@szBuffer缓冲区中
invoke SetDlgItemText,hWnd,IDC_SEL1,addr @szBuffer
;设置对话框中的字符串显示【项目几】
;******************************************************************************************************************************
; 双击项目弹出对话框
;******************************************************************************************************************************
.elseif ax == LBN_DBLCLK ;用户双击了一个项目
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX1,LB_GETCURSEL,0,0
;获取单选框中选定状态的项目索引
lea ecx,@szBuffer
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX1,LB_GETTEXT,eax,ecx
;获取eax中存储项目的字符串,放置到@szBuffer缓冲区中
invoke wsprintf,addr @szBuffer1,addr szMessage,addr @szBuffer
;格式化字符串
invoke MessageBox,hWnd,addr @szBuffer1,addr szTitle,MB_OK
;弹出消息框显示选中的项目
.endif
.elseif ax == IDC_Send
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX2,LB_RESETCONTENT,0,0
invoke SendDlgItemMessage,hWnd,IDC_EditT,WM_GETTEXT,sizeof @szPath,addr @szPath
invoke SendDlgItemMessage,hWnd,IDC_LISTBOX2,LB_DIR,DDL_ARCHIVE,addr @szPath
.endif
;******************************************************************************************************************************
.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,offset _ProcDlgMain,NULL;创建模态对话框
;函数从hInstance模块装载DLG_MAIN的资源
;父窗口就是本身,对话框过程是_ProcDlgMain
;dwInitParam是当做WM_INITDIALOG消息的lParam传给对话框过程,用来自定义消息
invoke ExitProcess,NULL
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
endstart
==================================================================
RC文件
#include<resource.h>
//>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
#defineICO_MAIN 0x1000 //图标
#defineDLG_MAIN 0x2000 //对话框
#defineIDC_LISTBOX1 101
#defineIDC_LISTBOX2 102
#defineIDC_SEL1103
#defineIDC_RESET 104
#defineIDC_ALL105
#defineIDC_EditT 106
#defineIDC_Send 107
#defineIDC_CHK1 201
#defineIDC_CHK2 202
#defineIDC_CHK3 203
#defineIDC_CHK4 204
#defineIDC_CHK5 205
#defineIDC_CHK6 206
#defineIDC_CHK7 207
//>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
ICO_MAIN ICON"Main.ico" //图标文件
//>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
DLG_MAIN DIALOG163,160,305,104 //对话框资源定义：X坐标,Y坐标,宽度,高度
STYLEDS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU//风格定义
CAPTION"列表框控件示例" //定义显示在窗口标题栏上的文字
FONT8, "微软雅黑" //定义对话框包括子窗口控件使用的字体和大小
//>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
BEGIN
DEFPUSHBUTTON"查看(&S)",IDOK,255,46,45,15
PUSHBUTTON"复位(&R)",IDC_RESET,255,27,45,15
PUSHBUTTON"全选(&A)",IDC_ALL,255,6,45,15
EDITTEXTIDC_EditT,69,84,74,11
PUSHBUTTON"更改查找(&D)",IDC_Send,148,84,36,14
LTEXT "版权：Xingdiy",-1,255,88,51,9
LISTBOX IDC_LISTBOX1,6,6,56,75,LBS_STANDARD
LISTBOX IDC_LISTBOX2,69,6,117,81,LBS_STANDARD | LBS_MULTIPLESEL | LBS_EXTENDEDSEL
LTEXT " ",IDC_SEL1,6,84,56,11
CONTROLICO_MAIN,-1,"Static",SS_ICON | WS_CHILD | WS_VISIBLE,256,62,42,21
CONTROLICO_MAIN,-1,"Static",SS_ICON | WS_CHILD | WS_VISIBLE,281,62,42,21
CHECKBOX"加入目录",IDC_CHK1,189,6,60,11
CHECKBOX"加入归档属性",IDC_CHK2,189,19,60,11
CHECKBOX"加入驱动器名",IDC_CHK3,189,33,60,11
CHECKBOX"包含隐藏文件",IDC_CHK4,189,46,60,11
CHECKBOX"包含只读文件",IDC_CHK5,189,60,60,11
CHECKBOX"包含系统文件",IDC_CHK6,189,73,60,11
CHECKBOX"包含可读写文件",IDC_CHK7,189,87,60,11
GROUPBOX"多选框",-1,66,-2,237,101
GROUPBOX"单选框",-1,1,-2,63,101
END
//>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
//>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
//WS_POPUP:弹出式窗口
//WS_VISIBLE:初始状态可见
//WS_SYSMENU:创建一个在其标题条中具有系统菜单框的窗口,仅适用于带标题条的窗口
//DS_MODALFRAME :指定带模式对话框边界的对话框,此风格和WS_CAPTION、WS_SYSMENU风格一起,创建带标题条和系统菜单的对话框
//WS_CAPTION:创建一个有标题的窗口,包含了WS_BORDER,不能和WS_DLGFRAME一起使用
//WS_BORDER:创建一个有边框的窗口
//WS_DLGFRAME :创建一个带有双层边框但没有标题的窗口
//CONTROL文本, ID, 类, 风格, X, Y, 宽度, 高度 [,扩展风格]
//invoke CreateWindow, 类名, 文本, 风格, X, Y, 宽度, 高度, 对话框窗口句柄, ID, hInstance, NULL
//控件名称[文本,] ID,X,Y,宽度,高度[,风格][,扩展风格]
//类介绍 ：按钮（Button）、静态（Static）、编辑（Edit）、滚动条（ScrollBar）、列表框（ListBox）、组合框（ComboBox）
没精力弄那个分支大嵌套。。还要继续学书中！
页:
[1]