添加的菜单，弹出菜单不显示

果心豆腐酱

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
集_子菜单句柄	整数型
集_窗口句柄	整数型

子程序名	返回值类型	公开	备 注
_按钮1_被单击

集_窗口句柄 ＝ 菜单_取句柄 (_启动窗口.取窗口句柄 ())
集_子菜单句柄 ＝ 菜单_取子句柄 (集_窗口句柄, 0)
菜单_添加 (集_子菜单句柄, “相册名1”, , , )
菜单_添加 (集_子菜单句柄, “相册名2”, , , )
菜单_添加 (集_子菜单句柄, “相册名3”, , , )
菜单_添加 (集_子菜单句柄, “相册名4”, , , )

子程序名	返回值类型	公开	备 注
_按钮1_鼠标右键被按下	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

弹出菜单 (编辑, , )

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 集_子菜单句柄, 整数型<br /> .程序集变量 集_窗口句柄, 整数型<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 集_窗口句柄 ＝ 菜单_取句柄 (_启动窗口.取窗口句柄 ())<br /> <br /> <br /> 集_子菜单句柄 ＝ 菜单_取子句柄 (集_窗口句柄, 0)<br /> 菜单_添加 (集_子菜单句柄, “相册名1”, , , )<br /> 菜单_添加 (集_子菜单句柄, “相册名2”, , , )<br /> 菜单_添加 (集_子菜单句柄, “相册名3”, , , )<br /> 菜单_添加 (集_子菜单句柄, “相册名4”, , , )<br /> <br /> .子程序 _按钮1_鼠标右键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 弹出菜单 (编辑, , )

为什么点击菜单，有显示。用弹出菜单的命令，就不显示添加的菜单了


添加菜单.e (165.06 KB, 下载次数: 12)

2023-5-7 00:48 上传

点击文件名下载附件

大司命

  

子程序名	返回值类型	公开	备 注
_按钮1_鼠标右键被按下	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

变量名	类 型	静态	数组	备 注
pt	精易_坐标

' 弹出菜单 (编辑, , )
pt ＝ 鼠标_取位置 ()
TrackPopupMenu (集_子菜单句柄, 位或 ( #TPM_LEFTALIGN, #TPM_RIGHTBUTTON ), pt.横, pt.纵, 0, 取窗口句柄 (), 0)

.版本 2<br /> .子程序 _按钮1_鼠标右键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> .局部变量 pt, 精易_坐标<br /> ' 弹出菜单 (编辑, , )<br /> pt ＝ 鼠标_取位置 ()<br /> TrackPopupMenu (集_子菜单句柄, 位或 (#TPM_LEFTALIGN, #TPM_RIGHTBUTTON), pt.横, pt.纵, 0, 取窗口句柄 (), 0)

陽陽陽

用api弹出菜单呢？有api相关命令吗？精益模块的肯定得和精益模块的配套啊。