神奇西部 發表於 2019-5-27 10:46:00

易语言 字节集转位图源码(exe转图片)

<p><img src="https://img2018.cnblogs.com/blog/966843/201905/966843-20190527104502128-844063716.png"></p>
<p><img src="https://img2018.cnblogs.com/blog/966843/201905/966843-20190527104512602-811839583.png"></p>
<p><img src="https://img2018.cnblogs.com/blog/966843/201905/966843-20190527104521090-268208347.png"></p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>.版本 2<br>.支持库 BmpOperate</p>
<p>.子程序 字节集到图片, 字节集, 公开<br>.参数 字节集, 字节集<br>.参数 图片宽度, 整数型, 可空<br>.局部变量 i1, 整数型<br>.局部变量 图片, 位图<br>.局部变量 i, 整数型<br>.局部变量 ii, 整数型<br>.局部变量 i2, 整数型<br>.局部变量 余数, 整数型<br>.局部变量 次数, 整数型<br>.局部变量 新字节集, 字节集</p>
<p>.如果真 (图片宽度 ≤ 0)<br>    图片宽度 = 50<br>.如果真结束<br>新字节集 = 到字节集 (到文本 (取字节集长度 (字节集))) + 到字节集 (“|”) + 字节集<br>i1 = 取字节集长度 (新字节集)<br>余数 = i1 % 图片宽度<br>.如果 (余数 = 0)<br>    次数 = i1 ÷ 图片宽度<br>.否则<br>    次数 = i1 ÷ 图片宽度 + 1<br>.如果结束<br>图片.创建 (图片宽度, 次数, 32, )<br>.计次循环首 (次数, i)<br>    .计次循环首 (图片宽度, ii)<br>      处理事件 ()<br>      i2 = i2 + 1<br>      .如果真 (i2 ≤ i1)<br>            图片.置某点颜色 (ii - 1, i - 1, 到数值 (新字节集 ))<br>      .如果真结束</p>
<p>    .计次循环尾 ()<br>.计次循环尾 ()<br>返回 (图片.取位图数据 ())</p>
<p><br>.子程序 图片到字节集, 字节集, 公开, 雪域冰狐 QQ:463018614<br>.参数 图片数据, 字节集<br>.局部变量 图片, 位图<br>.局部变量 i, 整数型<br>.局部变量 i1, 整数型<br>.局部变量 字节, 字节型, , "0"<br>.局部变量 颜色, 整数型<br>.局部变量 字节集, 字节集<br>.局部变量 字节集长度, 整数型</p>
<p>图片.载入数据 (图片数据)<br>.计次循环首 (图片.取高度 (), i)<br>    .计次循环首 (图片.取宽度 (), i1)<br>      处理事件 ()<br>      颜色 = 图片.取某点颜色 (i1 - 1, i - 1)<br>      加入成员 (字节, 到字节 (颜色))<br>    .计次循环尾 ()<br>.计次循环尾 ()<br>字节集 = 到字节集 (字节)<br>i = 寻找字节集 (字节集, 到字节集 (“|”), )<br>字节集长度 = 到数值 (到文本 (取字节集左边 (字节集, i - 1)))<br>字节集 = 取字节集左边 (取字节集右边 (字节集, 取字节集长度 (字节集) - i), 字节集长度)<br>返回 (字节集)</p><br><br>
来源:https://www.cnblogs.com/hongyuyingxiao/p/10929459.html
頁: [1]
查看完整版本: 易语言 字节集转位图源码(exe转图片)