枚举易语言菜单 怎么也取不到怎么回事？

火威网络

  

子程序名	返回值类型	公开	备 注
枚举易语言菜单
参数名	类 型	参考	可空	数组	备 注
窗口句柄	整数型

变量名	类 型	静态	数组	备 注
子窗口	整数型		0
i	整数型
ii	整数型
hMenu	整数型
nMenuCount	整数型
hSubMenu	整数型
nSubCount	整数型
nSubCount2	整数型
菜单标题	文本型		0
菜单ID	整数型		0

窗口_枚举所有子窗口EX (窗口句柄, 子窗口, “”)
计次循环首 (取数组成员数 (子窗口), i)
hMenu ＝ GetMenu (子窗口 [i])
如果真 (hMenu ≤ 0)  ' 判断当前窗口是否有菜单
到循环尾 ()
nMenuCount ＝ GetMenuItemCount (hMenu)
如果真 (nMenuCount ＝ -1)  ' 取出菜单数量 -1表示没有菜单
到循环尾 ()
输出调试文本 (到文本 (i) ＋ “/” ＋ 到文本 (子窗口 [i]) ＋ “/” ＋ 到文本 (hMenu) ＋ “/” ＋ 到文本 (nMenuCount))
计次循环首 (nMenuCount, ii)
hSubMenu ＝ GetSubMenu (hMenu, ii)
nSubCount ＝ GetMenuItemCount (hSubMenu)
如果真 (nSubCount ＞ 0)
输出调试文本 (到文本 (ii) ＋ “/” ＋ 到文本 (hSubMenu) ＋ “/” ＋ 到文本 (nSubCount) ＋ “/” ＋ 菜单_取标题 (hSubMenu, ii))

计次循环尾 ()
计次循环尾 ()

.版本 2<br /> <br /> .子程序 枚举易语言菜单<br /> .参数 窗口句柄, 整数型<br /> .局部变量 子窗口, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 ii, 整数型<br /> .局部变量 hMenu, 整数型<br /> .局部变量 nMenuCount, 整数型<br /> .局部变量 hSubMenu, 整数型<br /> .局部变量 nSubCount, 整数型<br /> .局部变量 nSubCount2, 整数型<br /> .局部变量 菜单标题, 文本型, , "0"<br /> .局部变量 菜单ID, 整数型, , "0"<br /> <br /> 窗口_枚举所有子窗口EX (窗口句柄, 子窗口, “”)<br /> .计次循环首 (取数组成员数 (子窗口), i)<br />     hMenu ＝ GetMenu (子窗口 <i>)<br />     .如果真 (hMenu ≤ 0)  ' 判断当前窗口是否有菜单<br />         到循环尾 ()<br />     .如果真结束<br />     nMenuCount ＝ GetMenuItemCount (hMenu)<br />     .如果真 (nMenuCount ＝ -1)  ' 取出菜单数量 -1表示没有菜单<br />         到循环尾 ()<br />     .如果真结束<br />     输出调试文本 (到文本 (i) ＋ “/” ＋ 到文本 (子窗口 <i>) ＋ “/” ＋ 到文本 (hMenu) ＋ “/” ＋ 到文本 (nMenuCount))<br />     .计次循环首 (nMenuCount, ii)<br />         hSubMenu ＝ GetSubMenu (hMenu, ii)<br />         nSubCount ＝ GetMenuItemCount (hSubMenu)<br />         .如果真 (nSubCount ＞ 0)<br />             输出调试文本 (到文本 (ii) ＋ “/” ＋ 到文本 (hSubMenu) ＋ “/” ＋ 到文本 (nSubCount) ＋ “/” ＋ 菜单_取标题 (hSubMenu, ii))<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()

用精易模块调试，我测试很久了，都是取不出来易语言菜单条的菜单，有知道怎么回事，求指教！

补充内容 (2020-3-22 19:26):
计次循环首 (nMenuCount, ii)
hSubMenu ＝ GetSubMenu (hMenu, ii)
nSubCount2 ＝ GetMenuItemCount (hSubMenu)
如果真 (nSubCount2 ＞ 0)
输出调试文本 (到文本 (ii) ＋ “/” ＋ 到文本 (hSubMenu) ＋ “/” ＋...

补充内容 (2020-3-22 19:27):
改一下补充这类变量写错了。

补充内容 (2020-3-22 19:29):
变量没错，自己看错了。

鹊聪软件

工具条控件有句柄,条内按钮为工具条的Item,无句柄

鹊聪软件

易语言菜单属于工具栏,类为:AfxControlBar,你所说的菜单是指雷名为:ReBar的菜单.所以你取不到.

火威网络

鹊聪软件 发表于 2020-3-23 04:13
易语言菜单属于工具栏,类为:AfxControlBar,你所说的菜单是指雷名为:ReBar的菜单.所以你取不到.

用什么方式才可以获取到，我想发消息触发他操作。

鹊聪软件

如果非要发消息点击菜单

  

子程序名	返回值类型	公开	备 注
点一下菜单

变量名	类 型	静态	数组	备 注
hwnd	整数型

' 不同分辨率坐标可能略有不同
hwnd ＝ 窗口_取句柄 (窗口_取句柄 (窗口_取句柄_模糊 (“”, “ENewFrame”), , “AfxControlBar42s”, “菜单条”), , “Afx:400000:b:10003:10:0”, “菜单条”)
鼠标_消息 (hwnd, 260, 5, , )  ' 点击菜单"运行"
程序_延时 (300, )
hwnd ＝ 窗口_取句柄 (, , “#32768”, “”)
鼠标_消息 (hwnd, 100, 55, , )  ' 点击"终止"
' 如果不确定坐标,可以用鼠标_移动()命令调整.

.版本 2<br /> <br /> .子程序 点一下菜单<br /> .局部变量 hwnd, 整数型<br /> <br /> ' 不同分辨率坐标可能略有不同<br /> hwnd ＝ 窗口_取句柄 (窗口_取句柄 (窗口_取句柄_模糊 (“”, “ENewFrame”), , “AfxControlBar42s”, “菜单条”), , “Afx:400000:b:10003:10:0”, “菜单条”)<br /> 鼠标_消息 (hwnd, 260, 5, , )  ' 点击菜单"运行"<br /> 程序_延时 (300, )<br /> hwnd ＝ 窗口_取句柄 (, , “#32768”, “”)<br /> 鼠标_消息 (hwnd, 100, 55, , )  ' 点击"终止"<br /> ' 如果不确定坐标,可以用鼠标_移动()命令调整.