调节窗口大小 图片 窗口

夜华

论坛找了很多个没如意的


分享一个 精易模块的
图片调节窗口大小.e (925.91 KB, 下载次数: 47)

2022-9-14 22:19 上传

点击文件名下载附件
下载积分: 精币 -2 枚

补充一下 这个自由调节 论坛上发布了一个API操作 但是对新手不友好

夜华

效果图增加一个bug 鼠标松开有个小bug 装个钩子 变量释放即可 看你自己想法加

  

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

是否移动 ＝ 真
钩子句柄 ＝ 鼠标钩子.安装钩子_鼠标 (取窗口句柄 (), &钩子回调, 真)  ' 程序集变量
鼠标_捕获 (图片框1.取窗口句柄 ())

子程序名	返回值类型	公开	备 注
钩子回调
参数名	类 型	参考	可空	数组	备 注
键代码	整数型
按键类型	整数型

如果真 (是否移动 ＝ 真)
如果真 (键代码 ＝ 1)  ' 左键
如果真 (按键类型 ＝ 2)  ' 弹起
是否移动 ＝ 假
鼠标钩子.卸载 (钩子句柄)  ' 程序集变量
鼠标_释放 ()

.版本 2<br /> <br /> .子程序 _图片框1_鼠标左键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 是否移动 ＝ 真<br /> 钩子句柄 ＝ 鼠标钩子.安装钩子_鼠标 (取窗口句柄 (), &钩子回调, 真)  ' 程序集变量<br /> 鼠标_捕获 (图片框1.取窗口句柄 ())<br /> <br /> .子程序 钩子回调<br /> .参数 键代码, 整数型<br /> .参数 按键类型, 整数型<br /> <br /> .如果真 (是否移动 ＝ 真)<br />     .如果真 (键代码 ＝ 1)  ' 左键<br />         .如果真 (按键类型 ＝ 2)  ' 弹起<br />             是否移动 ＝ 假<br />             鼠标钩子.卸载 (钩子句柄)  ' 程序集变量<br />             鼠标_释放 ()<br /> <br />         .如果真结束<br /> <br />     .如果真结束<br /> <br /> .如果真结束

30345

精易论坛，YYDS！

chinapk

对新手友好

名无所谓

感谢分享

夜华

名无所谓 发表于 2022-9-15 01:26
感谢分享

已更新一个bug

cfvgbhnj

精易论坛，YYDS！

本森Bin

感谢分享

wuqingg

支开感享

孤城已故

谢谢楼主，学习下！