关于按钮按下松开的问题

zenghao10

求助各位大佬 如何写一个按钮检测是否鼠标左键 按下/松开 当前按钮 谢谢各位大佬了
这是我写的代码，如下:

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

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

输出调试文本 (“按钮被按下”)

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

输出调试文本 (“按钮被松开")
按钮2.可视 ＝ 真
按钮1.可视 ＝ 假

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 _按钮_鼠标左键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 输出调试文本 (“按钮被按下”)<br /> <br /> .子程序 _按钮1_鼠标左键被放开, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 输出调试文本 (“按钮被松开")<br /> 按钮2.可视 ＝ 真<br /> 按钮1.可视 ＝ 假

补充内容 (2025-1-2 23:00):
在EX支持库里的按钮EX1按下松开并不管用，有什么办法么？

LEOONL

1.e (958.7 KB, 下载次数: 1)

2025-1-2 23:23 上传

点击文件名下载附件

源于互联

这逻辑没错吧，松开调试输出松开

尛龍科技

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

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

输出调试文本 (“按钮1被按下，位置: (” ＋ 到文本 (横向位置) ＋ “, ” ＋ 到文本 (纵向位置) ＋ “)，功能键状态: ” ＋ 到文本 (功能键状态))

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

输出调试文本 (“按钮1被松开，位置: (” ＋ 到文本 (横向位置) ＋ “, ” ＋ 到文本 (纵向位置) ＋ “)，功能键状态: ” ＋ 到文本 (功能键状态))
按钮2.可视 ＝ 真
按钮1.可视 ＝ 假

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

输出调试文本 (“按钮2被按下，位置: (” ＋ 到文本 (横向位置) ＋ “, ” ＋ 到文本 (纵向位置) ＋ “)，功能键状态: ” ＋ 到文本 (功能键状态))

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

输出调试文本 (“按钮2被松开，位置: (” ＋ 到文本 (横向位置) ＋ “, ” ＋ 到文本 (纵向位置) ＋ “)，功能键状态: ” ＋ 到文本 (功能键状态))
按钮2.可视 ＝ 假
按钮1.可视 ＝ 真

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 _按钮1_鼠标左键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 输出调试文本 (“按钮1被按下，位置: (” ＋ 到文本 (横向位置) ＋ “, ” ＋ 到文本 (纵向位置) ＋ “)，功能键状态: ” ＋ 到文本 (功能键状态))<br /> <br /> .子程序 _按钮1_鼠标左键被放开, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 输出调试文本 (“按钮1被松开，位置: (” ＋ 到文本 (横向位置) ＋ “, ” ＋ 到文本 (纵向位置) ＋ “)，功能键状态: ” ＋ 到文本 (功能键状态))<br /> 按钮2.可视 ＝ 真<br /> 按钮1.可视 ＝ 假<br /> <br /> .子程序 _按钮2_鼠标左键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 输出调试文本 (“按钮2被按下，位置: (” ＋ 到文本 (横向位置) ＋ “, ” ＋ 到文本 (纵向位置) ＋ “)，功能键状态: ” ＋ 到文本 (功能键状态))<br /> <br /> .子程序 _按钮2_鼠标左键被放开, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 输出调试文本 (“按钮2被松开，位置: (” ＋ 到文本 (横向位置) ＋ “, ” ＋ 到文本 (纵向位置) ＋ “)，功能键状态: ” ＋ 到文本 (功能键状态))<br /> 按钮2.可视 ＝ 假<br /> 按钮1.可视 ＝ 真

不知道这个是不是你想要的

LEOONL

没问题啊,你是不是被按下的 按钮1 写成 按钮 了 少了个1

  

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

输出调试文本 (“按钮被按下”)

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

输出调试文本 (“按钮被松开”)

.版本 2<br /> <br /> .子程序 _按钮1_鼠标左键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 输出调试文本 (“按钮被按下”)<br /> <br /> .子程序 _按钮1_鼠标左键被放开, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 输出调试文本 (“按钮被松开”)

zenghao10

尛龍科技 发表于 2025-1-2 22:42
[e=0].版本 2

.程序集 窗口程序集_启动窗口

你这个在按钮EX里没有用，而在基本组件中的按钮有用，有什么办法可以来解决吗？

hongqingfeng

别急慢慢来

zenghao10

LEOONL 发表于 2025-1-2 22:50
没问题啊,你是不是被按下的 按钮1 写成 按钮 了 少了个1
[e=0].版本 2

在EX支持库里的按钮用不了这个，有什么办法吗

尛龍科技

zenghao10 发表于 2025-1-2 23:02
你这个在按钮EX里没有用，而在基本组件中的按钮有用，有什么办法可以来解决吗？ ...

那你直接做按钮EX的事件里面添加就行了

zenghao10

hongqingfeng 发表于 2025-1-2 23:02
别急慢慢来

我现在才发现，现在我试了试就可以用了，但是在EX支持库里的按钮用不了"鼠标左键被按下和松开"，有什么办法来解决这个问题?