易语言图片框内的图片问题 50

当实际图片大小是图片框大小的2倍怎么用代码来调整显示置顶区域比如我想通过2个按钮来显示前面部分的和后面部分的不是置顶区域,是制定区域... 当实际图片大小是图片框大小的2倍
怎么用代码来调整显示置顶区域
比如我想通过2个按钮来显示前面部分的和后面部分的
不是置顶区域,是制定区域
展开
 我来答
爱小说178
2013-05-23 · 阅读CMS网站建设开发
爱小说178
采纳数:337 获赞数:599

向TA提问 私信TA
展开全部

通过图片框大小,取图像局部图片而以,以下代码取之易论坛某位大神的源码,仅供参考


以下为图像取局部代码

.版本 2
.子程序 图像_取局部, 字节集, 公开, 只能是0压缩,并且是8位或8位以上的位图!
.参数 原位图, 字节集
.参数 取出图像左边, 整数型
.参数 取出图像顶边, 整数型
.参数 取出宽度, 整数型
.参数 取出高度, 整数型
.局部变量 图像宽度, 整数型
.局部变量 图像高度, 整数型
.局部变量 图像位数, 整数型
.局部变量 图像压缩, 整数型
.局部变量 新位图, 字节集
.局部变量 新位图信息头, BITMAPINFOHEADER
.局部变量 新位图文件头, 文件头信息_
.局部变量 文件长度, 整数型
.局部变量 i, 整数型
.局部变量 颜色点阵偏移量, 整数型
.局部变量 点的大小, 整数型
.局部变量 颜色表, 字节集
.局部变量 总数据偏移, 整数型
.局部变量 新行宽, 整数型
.局部变量 原行宽, 整数型
.局部变量 时间, 整数型
图像宽度 = 取字节集数据 (取字节集中间 (原位图, 19, 4), #整数型, )
图像高度 = 取字节集数据 (取字节集中间 (原位图, 23, 4), #整数型, )
图像位数 = 取字节集数据 (取字节集中间 (原位图, 29, 2), #短整数型, )
图像压缩 = 取字节集数据 (取字节集中间 (原位图, 31, 4), #整数型, )
.如果真 (图像压缩 ≠ 0)
    返回 ({  })
.如果真结束
.如果真 (图像位数 = 32)
    颜色点阵偏移量 = 54
    点的大小 = 4
.如果真结束
.如果真 (图像位数 = 24)
    颜色点阵偏移量 = 54
    点的大小 = 3
.如果真结束
.如果真 (图像位数 = 16)
    颜色点阵偏移量 = 54
    点的大小 = 2
.如果真结束
.如果真 (图像位数 = 8)
    颜色点阵偏移量 = 1078
    点的大小 = 1
    颜色表 = 取字节集中间 (原位图, 55, 1024)
.如果真结束
.如果真 (图像位数 < 8)
    输出调试文本 (“错误! 图像位深小于8!”)
    返回 ({  })
.如果真结束
.如果真 (取出图像左边 + 取出宽度 > 图像宽度 或 取出图像顶边 + 取出高度 > 图像高度 或 取出图像左边 < 0 或 取出图像顶边 < 0 或 取出宽度 ≤ 0 或 取出高度 ≤ 0)
    输出调试文本 (“参数错误!请检查输入的参数!”)
    返回 ({  })
.如果真结束
原行宽 = 左移 (右移 (图像宽度 × 图像位数 + 31, 5), 2)
新行宽 = 左移 (右移 (取出宽度 × 图像位数 + 31, 5), 2)
文件长度 = 新行宽 × 取出高度
新位图 = 取空白字节集 (文件长度 + 54 + 取字节集长度 (颜色表))
新位图文件头.文件类型 = 19778
新位图文件头.偏移量 = 颜色点阵偏移量
新位图文件头.结果大小 = 颜色点阵偏移量 + 文件长度
复制内存_复制位图文件头到字节集 (新位图 [1], 新位图文件头, 14)
新位图信息头.biSize = 40
新位图信息头.biWidth = 取出宽度
新位图信息头.biHeight = 取出高度
新位图信息头.biPlanes = 1
新位图信息头.biBitCount = 图像位数
复制内存_复制位图信息头到字节集 (新位图 [15], 新位图信息头, 40)
.如果真 (图像位数 = 8)
    复制内存_字节集到字节集 (新位图 [55], 颜色表 [1], 1024)
.如果真结束
总数据偏移 = 原行宽 × (图像高度 - 取出高度 - 取出图像顶边) + 取出图像左边 × 点的大小  ' 总偏移=高偏移+宽偏移
.计次循环首 (取出高度, i)
    复制内存_字节集到字节集 (新位图 [(i - 1) × 新行宽 + 颜色点阵偏移量 + 1], 原位图 [颜色点阵偏移量 + 总数据偏移 + (i - 1) × 原行宽 + 1], 新行宽)
    处理事件 ()
.计次循环尾 ()
返回 (新位图)

以下为数据类型结构

.版本 2
.数据类型 BITMAPINFOHEADER
    .成员 biSize, 整数型
    .成员 biWidth, 整数型
    .成员 biHeight, 整数型
    .成员 biPlanes, 短整数型
    .成员 biBitCount, 短整数型
    .成员 biCompression, 整数型
    .成员 biSizeImage, 整数型
    .成员 biXPelsPerMeter, 整数型
    .成员 biYPelsPerMeter, 整数型
    .成员 biClrUsed, 整数型
    .成员 biClrImportant, 整数型
.版本 2
.数据类型 文件头信息_
    .成员 文件类型, 短整数型, , , bfType
    .成员 结果大小, 整数型, , , bfSize
    .成员 保留1, 短整数型, , , bfReserved1保留,必须设置为0
    .成员 保留2, 短整数型, , , bfReserved2保留,必须设置为0
    .成员 偏移量, , , , bfOffBits从文件头开始到实际的图象数据之间的字节的偏移量

以下为调用API函数

.版本 2
.DLL命令 复制内存_复制位图文件头到字节集, , , "RtlMoveMemory"
    .参数 Dest, 字节型, 传址
    .参数 Src, 文件头信息_
    .参数 len, 整数型
.DLL命令 复制内存_复制位图信息头到字节集, , , "RtlMoveMemory"
    .参数 Dest, 字节型, 传址
    .参数 Src, BITMAPINFOHEADER
    .参数 len, 整数型
.DLL命令 复制内存_字节集到字节集, , , "RtlMoveMemory"
    .参数 Dest, 字节型, 传址
    .参数 Src, 字节型, 传址
    .参数 len, 整数型
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
hc浊世佳公子
2013-05-23 · TA获得超过1.2万个赞
知道大有可为答主
回答量:1576
采纳率:60%
帮助的人:757万
展开全部
前面部分和后面部分是什么意思?图片是2面的?
追问
比如图片框100*100分辨率,而图片是200*100分辨率
那么图片框只能显示一半,如何调整显示另一半
追答

这样可以不?不用按钮,图片可以随意拖动。

用到了易语言自带的VCL面板和滚动框。晕,上传文件总失败。

已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式