level 1
灰色按钮吧,可以用灰色按钮克星之类的软件激活,灰色菜单也可以用软件激活,但是灰色菜单下的子菜单,应该用什么激活呢?那软件用VB编的,有谁能有破解方法呢?
2007年07月28日 03点07分
1
level 1
考虑用 EnumChildWindows 枚举窗口控件 菜单和子菜单都是控件,应该会枚举出来 顺便给你一个代码 Private Declare Function GetWindow Lib "user32" (ByVal hWnd As Long, ByVal wCmd As Long) As Long Private Declare Function EnableWindow Lib "user32" (ByVal hWnd As Long, ByVal fEnable As Long) As Long Private Const GW_HWNDFIRST = 0 Private Const GW_HWNDNEXT = 2 Private Const GW_CHILD = 5 Public Sub GoEnable(hWndParent As Long) Dim hWndChild As Long 'hWndParent是要激活的窗口句柄 hWndChild = GetWindow(hWndParent, GW_CHILD Or GW_HWNDFIRST) Do While hWndChild <> 0 EnableWindow hWndChild, 1 GoEnable hWndChild hWndChild = GetWindow(hWndChild, GW_HWNDNEXT) Loop End Sub 如果枚举不出来可以用 GetMenu VB声明 Declare Function GetMenu Lib "user32" Alias "GetMenu" (ByVal hwnd As Long) As Long 说明 取得窗口中一个菜单的句柄 以及 GetSubMenu VB声明 Declare Function GetSubMenu Lib "user32" Alias "GetSubMenu" (ByVal hMenu As Long, ByVal nPos As Long) As Long 说明 取得一个弹出式菜单的句柄,它位于菜单中指定的位置 返回值 Long,位于指定位置的弹出式菜单的句柄(如果有的话);否则返回零 参数表 参数 类型及说明 hMenu Long,菜单的句柄 nPos Long,条目在菜单中的位置。第一个条目的编号为0 获得子菜单的句柄 ~~三天了还没人回答
2007年08月02日 12点08分
4