基于Halcon学习的二维码识别【一】micro_qr_simple.hdev

此示例程序演示如何读取符号类型为“Micro QR Code”的二维数据代码。在第一步中，创建一个数据代码模型。在下一步中，将读取数据代码，并在图形窗口中显示结果。

请注意，有些符号无法使用标准默认参数找到。原因可能是：
-对比度太低-一些符号是明暗打印的，标准型号没有覆盖
-符号太大（>48x48模块）-模块打印为未连接的小点

---

总代码：

*初始化图像路径和视觉设置
dev_update_off ()
dev_close_window ()
*图片路径定义
ImageFiles := 'datacode/micro_qr/micro_qr_board_'
*变量定义
ImageNum := 6

*读取图片
read_image (Image, ImageFiles + '01')

*打开自适应图片的窗口
dev_open_window_fit_image (Image, 0, 0, -1, -1, WindowHandle)
set_display_font (WindowHandle, 16, 'mono', 'true', 'false')
dev_set_line_width (3)
dev_set_color ('green')
* 
* Display short description
*显示简短描述
Message := 'This simple program demonstrates how to'
Message[1] := 'read Micro QR data codes in a sequence'
Message[2] := 'of images with the standard default'
Message[3] := 'parameter setting.'

*显示信息--这个简单的程序演示了如何使用标准默认参数设置读取一系列图像中的微QR数据码
disp_message (WindowHandle, Message, 'window', 12, 12, 'black', 'true')
disp_continue_message (WindowHandle, 'black', 'true')
stop ()
* 
* Step 1: Create data code model
* ----------------------------------------------------
* Create a 2d data code model of the 2d data code class
* 'QR Code'. The operator returns a handle to the
* 2d data code model which can be used for all further
* operations on the data code.
*步骤1：创建数据代码模型
*创建二维数据代码类“二维码”的二维数据代码模型。运算符返回2d数据代码模型的句柄，
*该句柄可用于对数据代码的所有后续操作。
create_data_code_2d_model ('Micro QR Code', [], [], DataCodeHandle)
* 
* Step 2: Read the data codes
* ----------------------------------------------------
* Search and read the data codes in each image and
* display the decoded string for each found data code
*2.读取数据代码
*搜索并读取每个图像中的数据代码
*显示每个找到的数据代码的解码字符串
for Index := 1 to ImageNum by 1
    read_image (Image, ImageFiles + Index$'.2d')
    find_data_code_2d (Image, SymbolXLDs, DataCodeHandle, [], [], ResultHandles, DecodedDataStrings)
    * 
    * Display the results
    *显示结果
    dev_display (Image)
    dev_display (SymbolXLDs)
    disp_message (WindowHandle, 'Image ' + Index + ' of ' + ImageNum, 'window', 12, 12, 'black', 'true')
    disp_message (WindowHandle, DecodedDataStrings, 'window', 40, 12, 'black', 'true')
    * 
    * If no data code could be found
    *如果找不到数据代码
    if (|DecodedDataStrings| == 0)
        disp_message (WindowHandle, 'No data code found.\nPlease adjust the parameters.', 'window', 40, 12, 'red', 'true')
    endif
    * 
    * Deactivate the following lines to run the program without breaks
    *停用以下几行以不间断地运行程序
    if (Index < ImageNum)
        disp_continue_message (WindowHandle, 'black', 'true')
        stop ()
    endif
endfor
* 
* Clear the 2d data code model
*释放二维码阅读器分配的内存
clear_data_code_2d_model (DataCodeHandle)

---

逐段分析：

*初始化图像路径和视觉设置
dev_update_off ()
dev_close_window ()
*图片路径定义
ImageFiles := 'datacode/micro_qr/micro_qr_board_'
*变量定义
ImageNum := 6

*读取图片
read_image (Image, ImageFiles + '01')

*打开自适应图片的窗口
dev_open_window_fit_image (Image, 0, 0, -1, -1, WindowHandle)
set_display_font (WindowHandle, 16, 'mono', 'true', 'false')
dev_set_line_width (3)
dev_set_color ('green')

*显示简短描述
Message := 'This simple program demonstrates how to'
Message[1] := 'read Micro QR data codes in a sequence'
Message[2] := 'of images with the standard default'
Message[3] := 'parameter setting.'

*显示信息--这个简单的程序演示了如何使用标准默认参数设置读取一系列图像中的微QR数据码
disp_message (WindowHandle, Message, 'window', 12, 12, 'black', 'true')
disp_continue_message (WindowHandle, 'black', 'true')
stop ()

*步骤1：创建数据代码模型
*创建二维数据代码类“二维码”的二维数据代码模型。运算符返回2d数据代码模型的句柄，
*该句柄可用于对数据代码的所有后续操作。
create_data_code_2d_model ('Micro QR Code', [], [], DataCodeHandle)

*2.读取数据代码
*搜索并读取每个图像中的数据代码
*显示每个找到的数据代码的解码字符串
for Index := 1 to ImageNum by 1
    *读取图片
    read_image (Image, ImageFiles + Index$'.2d')

*寻找二维码  
find_data_code_2d (Image, SymbolXLDs, DataCodeHandle, [], [], ResultHandles, DecodedDataStrings)

    *显示结果
    dev_display (Image)
    dev_display (SymbolXLDs)
    
    *显示信息
    disp_message (WindowHandle, 'Image ' + Index + ' of ' + ImageNum, 'window', 12, 12, 'black', 'true')

    *显示读取出来的结果
    disp_message (WindowHandle, DecodedDataStrings, 'window', 40, 12, 'black', 'true')

    *如果找不到数据代码
    if (|DecodedDataStrings| == 0)
        disp_message (WindowHandle, 'No data code found.\nPlease adjust the parameters.', 'window', 40, 12, 'red', 'true')
    endif
    * 
    * Deactivate the following lines to run the program without breaks
    *停用以下几行以不间断地运行程序
    if (Index < ImageNum)
        disp_continue_message (WindowHandle, 'black', 'true')
        stop ()
    endif
endfor

*释放二维码阅读器分配的内存
clear_data_code_2d_model (DataCodeHandle)