按键盘上方向键 ← 或 → 可快速上下翻页，按键盘上的 Enter 键可回到本书目录页，按键盘上方向键 ↑ 可回到本页顶部！
————未阅读完？加入书签已便下次继续阅读！
invoke DestroyWindow；hWinMain
invoke PostQuitMessage；NULL
；********************************************************************
。elseif eax WM_CREATE
mov eax；hWnd
mov hWinMain；eax
invoke CreateWindowEx；WS_EX_CLIENTEDGE；addr szClass；
NULL；WS_CHILD or WS_VISIBLE or ES_MULTILINE
or ES_WANTRETURN or WS_VSCROLL or
ES_AUTOHSCROLL；0；0；0；0；
hWnd；ID_EDIT；hInstance；NULL
mov hWinEdit；eax
invoke CreateToolbarEx；hWinMain；WS_VISIBLE or
WS_CHILD or TBSTYLE_FLAT or TBSTYLE_TOOLTIPS or
CCS_ADJUSTABLE；ID_TOOLBAR；0；HINST_MCTRL；
IDB_STD_SMALL_COLOR；offset stToolbar；
NUM_BUTTONS；0；0；0；0；sizeof TBBUTTON
Mov hWinToolbar；eax
Call _Resize
；********************************************************************
。elseif eax WM_MAND
mov eax；wParam
。if ax IDM_EXIT
invoke EndDialog；hWnd；NULL
。elseif ax ！= ID_EDIT
invoke wsprintf；addr @szBuffer；
addr szFormat；wParam
invoke MessageBox；hWnd；addr @szBuffer；
addr szCaption；
MB_OK or MB_ICONINFORMATION
。endif
；********************************************************************
。elseif eax WM_SIZE
call _Resize
；********************************************************************
； 处理用户定制工具栏消息
；********************************************************************
。elseif eax WM_NOTIFY
mov ebx；lParam
；********************************************************************
； 因为印刷宽度，请注意缩进格式！
；********************************************************************
。if ＇ebx ＋ NMHDRde＇ TTN_NEEDTEXT
assume ebx：ptr TOOLTIPTEXT
mov eax；＇ebx＇。hdr。idFrom
mov ＇ebx＇。lpszText；eax
push hInstance
pop ＇ebx＇。hinst
assume ebx：nothing
。elseif （＇ebx ＋ NMHDRde＇ TBN_QUERYINSERT） ｜｜
（＇ebx ＋ NMHDRde＇ TBN_QUERYDELETE）
mov eax；TRUE
ret
。elseif ＇ebx ＋ NMHDRde＇ TBN_GETBUTTONINFO
assume ebx：ptr TBNOTIFY
mov eax；＇ebx＇。iItem
。if eax 《 NUM_BUTTONS
mov ecx；sizeof TBBUTTON
mul ecx
add eax；offset stToolbar
invoke RtlMoveMemory；addr ＇ebx＇。tbButton；eax；sizeof TBBUTTON
invoke LoadString；hInstance；＇ebx＇。tbButton。idmand；
addr @szBuffer；sizeof @szBuffer
lea eax；@szBuffer
mov ＇ebx＇。pszText；eax
invoke lstrlen；addr @szBuffer
mov ＇ebx＇hText；eax
assume ebx：nothing
mov eax；TRUE
ret
。endif
。endif
；********************************************************************
。else
invoke DefWindowProc；hWnd；uMsg；wParam；lParam
ret
。endif
；********************************************************************
xor eax；eax
ret
_ProcWinMain endp
；》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》
_WinMain proc
local @stWndClass：WNDCLASSEX
local @stMsg：MSG
invoke InitmonControls
invoke GetModuleHandle；NULL
mov hInstance；eax
invoke LoadMenu；hInstance；IDM_MAIN
mov hMenu；eax
；********************************************************************
； 注册窗口类
；********************************************************************
invoke RtlZeroMemory；addr @stWndClass；sizeof @stWndClass
invoke LoadIcon；hInstance；ICO_MAIN
mov @stWndClass。hIcon；eax
mov @stWndClass。hIconSm；eax
invoke LoadCursor；0；IDC_ARROW
mov @stWndClass。hCursor；eax
push hInstance
pop @stWndClass。hInstance
mov @stWndClass。cbSize；sizeof WNDCLASSEX
mov @stWndClass。style；CS_HREDRAW or CS_VREDRAW
mov @stWndClass。lpfnWndProc；offset _ProcWinMain
mov @stWndClass。hbrBackground；COLOR_BTNFACE＋1
mov @stWndClass。lpszClassName；offset szClassName
invoke RegisterClassEx；addr @stWndClass
来源：电子工业出版社 作者：罗云彬 上一页 回书目 下一页
上一页 回书目 下一页
第9章 通用控件
9。3 使用工具栏（3）
；********************************************************************
； 建立并显示窗口
；********************************************************************
invoke CreateWindowEx；NULL；
offset szClassName；offset szCaptionMain；
WS_OVERLAPPEDWINDOW；
CW_USEDEFAULT；CW_USEDEFAULT；700；500；
NULL；hMenu；hInstance；NULL
mov hWinMain；eax
invoke ShowWindow；hWinMain；SW_SHOWNORMAL
invoke UpdateWindow；hWinMain
；********************************************************************
； 消息循环
；********************************************************************
。while TRUE
invoke GetMessage；addr @stMsg；NULL；0；0
。break 。if eax 0
invoke TranslateMessage；addr @stMsg
invoke DispatchMessage；addr @stMsg
。endw
ret
_WinMain endp
；》》》》》》》》》》》》》》》》》》》》》》》》》》》》