滚动鼠标显示大图代码

易语言 2020-07-24 16:31:50

滚动鼠标显示大图代码

Pic = 取字节集中间 (参_图片, 1, 54)
宽 = 取字节集数据 (Pic, #整数型, 19)
高 = 取字节集数据 (Pic, #整数型, 23)
位深 = 取字节集数据 (Pic, #整数型, 29)
位图.创建 (宽, 高, 位深, #白色)
位图.载入数据 (参_图片)
缓存位图.创建 (参_显示范围矩形.width, 参_显示范围矩形.height, 位深, #白色)
纵向滚动条1.最小位置 = 0
纵向滚动条1.最大位置 = 高 - 参_显示范围矩形.height
横向滚动条1.最小位置 = 0
横向滚动条1.最大位置 = 宽 - 参_显示范围矩形.width