易语言图片框复制组件鼠标进入移出事件写法
<p>这种方法，不仅仅是图片框，可以是任何有鼠标位置移动事件的组件，这样任何组件都可以模仿图形按钮的鼠标滑动效果。</p><p><img src="https://img2020.cnblogs.com/blog/966843/202112/966843-20211204112900713-1225723636.png"></p>
<p>.版本 2</p>
<p>.支持库 spec<br><br>.子程序 _图片框_主载体_鼠标位置被移动, 逻辑型<br>.参数 横向位置, 整数型<br>.参数 纵向位置, 整数型<br>.参数 功能键状态, 整数型<br>.局部变量 tpk, 图片框<br><br>tpk ＝ 取事件组件 ()<br>.如果真 (集_id ≠ 到整数 (tpk.标记))<br> 集_id ＝ 到整数 (tpk.标记)<br> 调试输出 (“图片框标记为” ＋ 到文本 (集_id) ＋ “鼠标被称入”)<br><br>.如果真结束<br><br><br>.子程序 __启动窗口_鼠标位置被移动, 逻辑型<br>.参数 横向位置, 整数型<br>.参数 纵向位置, 整数型<br>.参数 功能键状态, 整数型<br><br>.如果真 (集_id ≠ 0)<br> 调试输出 (“图片框标记为” ＋ 到文本 (集_id) ＋ “鼠标被移出”)<br> 集_id ＝ 0</p>
<p id="1638588541197"> </p><br><br>
来源：https://www.cnblogs.com/hongyuyingxiao/p/15641361.html
頁:
[1]