无名下载

聚合IT技术文章
开源代码资料下载站

字节集与图片互相转换

大小:2.227KB更新时间:2020-08-15

部分简介

文件长度 = 取字节集长度 (字节集)
.如果真 ((图片宽 - 3) × 图片高 < 文件长度)
图片高 = 文件长度 ÷ (图片宽 - 3)
.如果真结束
字节 = 左移 (右移 (图片宽 × 24 + 31, 5), 2)
字节集 = 字节集 + 取空白字节集 (字节 × 图片高 - 取字节集长度 (字节集))
整数0 = 54 + 取字节集长度 (字节集)
字节集0 = { 66, 77 } + 到字节集 (整数0) + 到字节集 (文件长度) + 到字节集 (54)
字节集0 = 字节集0 + { 40, 0, 0, 0 } + 到字节集 (图片宽) + 到字节集 (图片高) + { 1, 0, 24, 0, 0, 0, 0, 0 } + 到字节集 (取字节集长度 (字节集)) + 取空白字节集 (16)

.如果真 (通用对话框1.打开 ())
编辑框_打开文件.内容 = 通用对话框1.文件名
字节集 = 读入文件 (编辑框_打开文件.内容)
到图片 (字节集, 到整数 (编辑框_高度.内容), 到整数 (编辑框_宽度.内容))
写到文件 (取当前目录 () + “\保存文件.bmp”, 字节集)
信息框 (“文件已经转换保存”, 0, )

猜你喜欢

官方微信二维码 无名官方微信公众号