易语言专用数码设备支持库操作

缩略图画板.画图片 (图片号, 0, 0, 缩略图画板.宽度, 缩略图画板.高度, )
图像 ＝ 图片
图宽 ＝ 图片宽度
图高 ＝ 图片高度
找到 ＝ 寻找文件 (取运行目录 () ＋ “\图象文件*.bmp”, )
.循环判断首 ()
找到 ＝ 子文本替换 (找到, “图象文件”, “0”, , , 真)
前次取得 ＝ 到数值 (找到) ＞ 编号
.如果真 (前次取得)
编号 ＝ 到数值 (找到)
.如果真结束
找到 ＝ 寻找文件 (, )
.循环判断尾 (找到 ≠ “”)
.如果真 (前次取得)
编号 ＝ 编号 ＋ 1
.如果真结束
数码设备.保存到文件 (取运行目录 () ＋ “\图象文件” ＋ 到文本 (编号 ＋ 1) ＋ “.bmp”)