你源码上，列表框需要把这里设置为假，然后才可以设置右键弹菜单，否则你右键的话那个列表框的现行选中项一直是-1.永远弹不了菜单。

.版本 2

.子程序 _列表框1_鼠标右键被放开, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

弹出菜单 (菜单, , )
‘我自己定义的菜单名 叫菜单 你改成你自己的



补充内容 (2025-5-10 12:14):
设置 列表框的 右键事件 作为触发菜单弹出的事件

liu2000 发表于 2025-5-10 11:48
大佬，图片上的当前无选中项，可以直接右键选中然后弹出那个菜单，不用左键点击后再右键，这个怎么实现呀 ...

列表框1.取项目文本 (列表框1.现行选中项)

aipca 发表于 2025-5-10 11:40
加个菜单，右键超列弹出菜单即可。

大佬，图片上的当前无选中项，可以直接右键选中然后弹出那个菜单，不用左键点击后再右键，这个怎么实现呀

加个菜单，右键超列弹出菜单即可。

liu2000 发表于 2025-5-10 11:48
大佬，图片上的当前无选中项，可以直接右键选中然后弹出那个菜单，不用左键点击后再右键，这个怎么实现呀 ...

  

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

鼠标_消息 (路径列表列表框1.取窗口句柄 (), 横向位置, 纵向位置, , 1)
处理事件 ()
弹出菜单 (菜单, 取鼠标水平位置 () ＋ 1, 取鼠标垂直位置 () ＋ 1)

.版本 2<br /> <br /> .子程序 _路径列表列表框1_鼠标右键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 鼠标_消息 (路径列表列表框1.取窗口句柄 (), 横向位置, 纵向位置, , 1)<br /> 处理事件 ()<br /> 弹出菜单 (菜单, 取鼠标水平位置 () ＋ 1, 取鼠标垂直位置 () ＋ 1)