易语言源码易语言鼠标滑轮控制图片框大小（求教，易语言如何让图片框中的图片放大）

：暂无数据 2026-06-26 00:00:01 ：1

本篇文章给大家谈谈易语言源码易语言鼠标滑轮控制图片框大小，以及求教，易语言如何让图片框中的图片放大对应的知识点，希望对各位有所帮助，不要忘了收藏本站喔。

本文目录

求教，易语言如何让图片框中的图片放大
如何用易语言制作“当鼠标移动到图片上的时候图片会放大，移动开了又变回原样的效果”
易语言用滑块条控制放大或缩小图片
易语言实现控件拖动变形比如：用画板或者图片框载入图片后，对图片可以进行拖动缩放如下图
易语言如何让图片框1跟随鼠标移动
易语言中让图片框显示的图片尺寸等于图片框的尺寸
易语言图片框放满窗口
易语言怎么让添加的图片放大缩小
如何用鼠标滚轮缩放图片大小（易语言）一个看图程序，把鼠标放在图片上，滚动滚轮实现图片缩放！

求教，易语言如何让图片框中的图片放大

.版本
2
.程序集
窗口程序集1
.子程序
_按钮1_被单击
图片框1.宽度
＝
到整数
(图片框1.宽度)
＋
10
图片框1.高度
＝
到整数
(图片框1.高度)
＋
10
.子程序
__启动窗口_创建完毕
图片框1.显示方式
＝
1
‘要先放入一张图片哟

如何用易语言制作“当鼠标移动到图片上的时候图片会放大，移动开了又变回原样的效果”

需要两个事件onMouseover()事件，在这个事件里面把图片的height，和width变大就行了！onMouseOut()事件，把这个图片的height，和width还原

我就懒得按楼主要求做了，我只做了图片缩放部分，楼主的问题补充自己做可以吧！
.版本 2
.程序集窗口程序集1
.程序集变量图片号, 整数型
.程序集变量缩放值, 小数型
.子程序 __启动窗口_创建完毕
滑块条1.最小位置＝ 10 ’ 表示最小可缩小到0.1倍
滑块条1.最大位置＝ 500 ’ 100表示1倍、200表示2倍、300表示3倍。。。
滑块条1.位置＝ 100 ’ 100表示原始尺寸
滑块条1.调整层次 (#顶层)
画板1.自动重画＝真
移动 (200, 200, 800, 600)
画板1.移动 (0, 0, 800, 600)
缩放值＝ 1 ’ 1表示原始尺寸 / 1表示1倍、2表示2倍、3表示3倍。。。
.子程序 _按钮1_被单击
通用对话框1.类型＝ 0
通用对话框1.过滤器＝ “图片文件|*.jpg;*.bmp;*.gif”
.如果真 (通用对话框1.打开 ())
.如果真 (图片号 ≠ 0)
卸载图片 (图片号)
.如果真结束
图片号＝载入图片 (通用对话框1.文件名)
画出图片 (图片号)
.如果真结束

.子程序画出图片
.参数图片号_, 整数型
.局部变量图片宽度
.局部变量图片高度
画板1.清除 (, , , )
图片宽度＝画板1.取图片宽度 (图片号_) × 缩放值
图片高度＝画板1.取图片高度 (图片号_) × 缩放值
’ 画板1.移动 (0, 0, 图片宽度, 图片高度)
画板1.画图片 (图片号_, 0, 0, 图片宽度, 图片高度, )
.子程序 _滑块条1_位置被改变
缩放值＝滑块条1.位置 ÷ 100
画出图片 (图片号)
标题＝ “缩放倍数：” ＋到文本 (缩放值) ＋ “倍 /缩放值：” ＋到文本 (滑块条1.位置) ＋ “%”

易语言实现控件拖动变形比如：用画板或者图片框载入图片后，对图片可以进行拖动缩放如下图

好吧，其实这样就可以实现。

1、如下图，鼠标左键被按下（），下面有个图片框.发送消息（161,2,0），这个的意思就是在图片框控件按住左键时，可以随时移动位置。

2、缩放图片，这里在滚轮滚动（），事件下，进行了宽度和高度的随时调整，可以实现图片的缩放。

如果是你图上那样通过边上的小方块去拖动，我不知道有没有这种控件。没有的话，你可以自己用图边框仿造一个，就是比较麻烦。但是效果是可以实现的

易语言如何让图片框1跟随鼠标移动

.子程序 _时钟1_周期事件
.局部变量 x, 整数型
.局部变量 y, 整数型x ＝取鼠标水平位置 ()
y ＝取鼠标垂直位置 ()
长度＝ 102 －横向滚动条1.位置竖.移动 (x － _启动窗口.宽度 ÷ 2 ＋ 109, y － 499, , )
横.移动 (x － _启动窗口.宽度 ÷ 2 － 109, y － 49, , )

易语言中让图片框显示的图片尺寸等于图片框的尺寸

首先，说个问题，你要的效果是：图片的显示尺寸与图片框相等，这不就相当于缩放图片了吗？

还是说你想要图片框的大小根据显示的图片来调整？

1、如果让显示图片适应图片框，那就是图片框的显示方式是缩放；

2、如果让图片框大小去适应显示的图片，可以通过“取图片宽度（）”和高度取出图片宽高，然后去改变图片框。

图片在正常显示情况下：让图片框使用缩放显示方式去显示图片

单击按钮2放大图片，可以插入个新窗口，让这个窗口没有边框就一个图片框覆盖整个窗口，然后载入窗口后，让这个窗口以及窗口里面的图片框的宽高调整的和“取图片宽度（）”“取图片高度（）”的大小一样了，后让图片框加载图片，及这个窗口显示的是原尺寸的图片了。

这样的效果就是：单击按钮2，弹出个窗口显示完全的原尺寸效果。至于结束显示，可以通过其他按钮，或单击窗口里的图片框后在关闭这个窗口。

在提供一个方法，就是可调图片框，就是鼠标在图片框里时，通过滚轮可以滚动随时放大图片框及缩小图片框，来临时改变图片框大小以满足用户的查看体验。图片框在缩放的显示下，代码如下：

（这是我从自己一个程序中拿来的代码，图片框是EXUI的，普通应该也可以吧）

.版本 2
.支持库 exui
.子程序 _h4图片框EX4_滚轮滚动, , , 缩放图片
.参数 lp, 整数型
.参数 wp, 整数型
.判断开始 (wp ＜ 0)
    h4图片框EX4.宽度＝ h4图片框EX4.宽度＋ 40
    h4图片框EX4.高度＝ h4图片框EX4.高度＋ 40
.判断 (wp ＞ 0)
    h4图片框EX4.宽度＝ h4图片框EX4.宽度－ 40
    h4图片框EX4.高度＝ h4图片框EX4.高度－ 40
.默认

参考看看吧，不知道达到你要效果没

易语言图片框放满窗口

_启动窗口_尺寸被改变下写代码：
图片框1.宽度=_启动窗口.宽度
图片框1.高度=_启动窗口.高度-30 ’减30可以自己调整和启动窗口的一样就可以了，我也记不得减多少了

易语言怎么让添加的图片放大缩小

.版本 2
.子程序 _图片框3_滚轮被滚动, 逻辑型, , 滚动放大与缩小图片
.参数滚动距离, 整数型
.参数功能键状态, 整数型
.如果 (滚动距离＝ 1)
XWZ1 ()
.否则
XWZ2 ()
.如果结束
.子程序 XWZ1, , , 缩小图片
图片框3.可视＝真
图片框2.可视＝假
图片框3.显示方式＝ 1
图片框3.高度＝图片框3.高度 ÷ 1.5
图片框3.宽度＝图片框3.宽度 ÷ 1.5
图片框3.移动 ((图片框1.取用户区宽度 () －图片框3.取用户区宽度 ()) ÷ 2, (图片框1.取用户区高度 () －图片框3.取用户区高度 ()) ÷ 2, , )
.子程序 XWZ2, , , 放大图片
图片框2.可视＝假
图片框3.可视＝真
图片框3.显示方式＝ 1
图片框3.高度＝图片框3.高度 × 1.5
图片框3.宽度＝图片框3.宽度 × 1.5
图片框3.移动 ((图片框1.取用户区宽度 () －图片框3.取用户区宽度 ()) ÷ 2, (图片框1.取用户区高度 () －图片框3.取用户区高度 ()) ÷ 2, , )