易语言_把非24位BMP、JPG、GIF的图片转化为24位图

.版本 2

.子程序 到24位图, 字节集, 公开, 把非24位BMP、JPG、GIF的图片转化为24位图
.参数 图片数据, 字节集, 参考
.局部变量 图片对象, 对象
.局部变量 返回数据, 字节集

.如果 (取字节集左边 (图片数据, 2) ≠ { 66, 77 } 或 取字节集数据 (图片数据, #短整数型, 29) ≠ 24)
    图片对象.创建图片对象 (图片数据)
    返回数据 ＝ 图片对象.取回图片 ()
    图片对象.清除 ()
.否则
    返回数据 ＝ 图片数据
.如果结束
返回 (返回数据)