朱皮特的博客 自由的飞翔

托盘区窗口及子控件的类信息

2009-02-27
朱皮特
阅读量:

hwnd2 = FindWindow("Shell_TrayWnd", vbNullString)
hwnd2 = FindWindowEx(hwnd2, 0, "TrayNotifyWnd", vbNullString)
hwnd2 = FindWindowEx(hwnd2, 0, "SysPager", vbNullString)
hwnd2 = FindWindowEx(hwnd2, 0, "ToolbarWindow32", vbNullString)

BtnCount = SendMessage(hwnd2, TB_BUTTONCOUNT, 0, 0)

lLen = SendMessage(hwnd2, TB_GETBUTTONTEXTA, i, ByVal lpIconText)

SPY++查看的窗口信息:


Comments

Content