tip.asm

来自「一个十六进制编辑器源代码,cool!」· 汇编 代码 · 共 32 行

_CreateTip proto:DWORD ,:DWORD ,:DWORD 
.code
;hWndParent:父窗口
;nID:子控件的ID
;lpszText;显示的提示语的指针
_CreateTip proc _hWnd,nID,lpszText
local @hwndTip,@ti:TOOLINFO
local @szBuf[100]:BYTE 
	xor eax,eax
	invoke CreateWindowEx,eax,ctext("Tooltips_class32"),eax,TTS_BALLOON,\
		CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,\
		_hWnd,eax,hInstance,eax

	mov @hwndTip,eax
	invoke SendDlgItemMessage,_hWnd,nID,WM_GETTEXT ,100,addr @szBuf
	.if eax==0
		mov DWORD ptr @szBuf,'piT'
	.endif
	invoke SendMessage,@hwndTip,TTM_SETTITLE,NULL,addr @szBuf
	invoke RtlZeroMemory,addr @ti,sizeof @ti
	mov @ti.cbSize,sizeof TOOLINFO 
	mov @ti.uFlags,TTF_SUBCLASS or TTF_IDISHWND 
	invoke GetDlgItem,_hWnd,nID	
	mov @ti.hWnd,eax
	mov @ti.uId,eax
	m2m @ti.hInst,hInstance
	m2m @ti.lpszText,lpszText
	invoke SendMessage,@hwndTip,TTM_ADDTOOL ,0,addr @ti
	
	ret
_CreateTip endp