Halcon的图像获取的实例

重新整理之前旧网站上发布过的帖子。 

比较常用的几个图像获取的例子，之前刚刚学习halcon的时候写的，作为入门的第一步，还是值得再分享一下的。 

*=================分割线1================== 
*图像获取的基本代码（1） 
*读取路径下的图片,image1 
read_image(image1,'F:/Halcon test/barcode/image/1.png') 

*=================分割线2================== 
*图像获取的基本代码（2） 
*读取路径下的多张图片,image2 
imagepath :=[] 
*建立一个图像读取的数组，命名为imagepath。 
imagepath[0]:='F:/Halcon test/barcode/image/2.png' 
imagepath[1]:='F:/Halcon test/barcode/image/3.png' 
imagepath[2]:='F:/Halcon test/barcode/image/4.png' 
imagepath[3]:='F:/Halcon test/barcode/image/5.png' 
*读取4张图片的路径 
for i:=0 to 3 by 1 
    read_image(image2,imagepath[i]) 
endfor 

*=================分割线3================== 
*图像获取的基本代码（3） 
*读取文件夹下的某些图片,image3 
for i:=1 to 5 by 1 
    read_image(image3,'F:/Halcon test/barcode/image/'+i+'.png') 
endfor 


*=================分割线4================== 
*图像获取的基本代码（4） 
*读取文件夹下的所有图片和文件夹，image4 
* Code generated by Image Acquisition 01 
list_files ('F:/Halcon test/barcode/image', ['files','directories','recursive','max_depth 2','follow_links'], ImageFiles) 
tuple_regexp_select (ImageFiles, ['\\.(tif|tiff|gif|bmp|jpg|jpeg|jp2|png|pcx|pgm|ppm|pbm|xwd|ima)$','ignore_case'], ImageFiles) 
*'ignore_case'：忽略大小写 
*'\\.'  --> '.' 
for Index := 0 to |ImageFiles| - 1 by 1 
    read_image (Image4, ImageFiles[Index]) 
    * Do something 
endfor 

*=================分割线5================== 
*图像获取的基本代码（5） 
*连接摄像机读取图像，image5 
* Code generated by Image Acquisition 02 
open_framegrabber ('DirectShow', 1, 1, 0, 0, 0, 0, 'default', 8, 'rgb', -1, 'false', 'default', '0', -1, -1, AcqHandle) 
grab_image_start (AcqHandle, -1) 
while (true) 
    grab_image_async (Image5, AcqHandle, -1) 
    * Do something 
endwhile 
close_framegrabber (AcqHandle)