
for i := 0 to 29 by 1
mmm:='C:/Users/Administrator/Desktop/out_003/orig/orig_'+i$'03'+'.bmp'
read_image (Image,mmm)
write_image (Image, 'jpg', 0, 'C:/Users/Administrator/Desktop/out_003/orig/orig_'+i$'03')
endfor
这段代码用于从C:/Users/Administrator/Desktop/out_003/orig/目录下读取000到299编号的bmp图像文件,然后将它们转换为jpg格式并保存在同一目录下。

for i := 0 to 29 by 1
mmm:='C:/Users/Administrator/Desktop/out_003/orig/orig_'+i$'03'+'.bmp'
read_image (Image,mmm)
write_image (Image, 'jpg', 0, 'C:/Users/Administrator/Desktop/out_003/orig/orig_'+i$'03')
endfor
877

被折叠的 条评论
为什么被折叠?