path:='C:/Users/G3/Desktop/Intensity'
list_files (path, ['files','follow_links'], ImageFiles)
tuple_regexp_select (ImageFiles, ['\\.(tif|tiff|gif|bmp|jpg|jpeg|jp2|png|pcx|pgm|ppm|pbm|xwd|ima|hobj)$','ignore_case'], ImageFiles)
for Index := 0 to |ImageFiles|-1 by 1
read_image (Image,ImageFiles[Index])
parse_filename(ImageFiles[Index], BaseName, Extension, Directory)
write_image (Image, 'bmp', 0, Directory+'/out'+BaseName+'.')
endfor
Halcon学习——批量读取文件夹下图片+批量写入
最新推荐文章于 2024-06-03 09:52:55 发布