HALCON读取图片程序

read_image (Image2, 'D:/用户目录/我的图片/bmp/24位腐蚀原图.bmp')
i:=10
while (i<15)
ImageFiles:=[]
ImageFiles[0]:='D:/用户目录/我的图片/bmp/PIC00000.bmp'
ImageFiles[1]:='D:/用户目录/我的图片/bmp/PIC00001.bmp'
ImageFiles[2]:='D:/用户目录/我的图片/bmp/PIC00002.bmp'
ImageFiles[3]:='D:/用户目录/我的图片/bmp/PIC00003.bmp'
ImageFiles[4]:='D:/用户目录/我的图片/bmp/PIC00004.bmp'
ImageFiles[5]:='D:/用户目录/我的图片/bmp/PIC00005.bmp'
ImageFiles[6]:='D:/用户目录/我的图片/bmp/PIC00006.bmp'
for Index := 1 to 5 by 1
    read_image(Image,ImageFiles[Index])
endfor
i:=i+1
endwhile