* 2D Code generated by Image Acquisition 01

* QR Code
dev_close_window ()
dev_open_window (0, 0, 400, 400, 'black', WindowHandle)
*先關(guān)閉活動(dòng)圖形窗口，再打開(kāi)這個(gè)窗口，標(biāo)識(shí)符為WindowHandle；
*相對(duì)于界面左上角第0行、第0列，大小為400×400像素，顏色為黑色。
open_framegrabber ('DirectShow', 1, 1, 0, 0, 0, 0, 'default', 8, 'rgb', -1, 'false', 'default', 'Gsou USB2.0 Camera', 0, -1, AcqHandle)
* 打開(kāi)幀接收器（圖像采集設(shè)備，如攝像頭，工業(yè)相機(jī)等），參數(shù)（Parameter）詳見(jiàn)這個(gè)算子
* 注意攝像頭的名稱(chēng),可以用工具欄中的“助手”——打開(kāi)新的Image Acquisition獲取攝像頭及插入代碼
grab_image_start (AcqHandle, -1)
while (true)
grab_image_async (Image, AcqHandle, -1)
create_data_code_2d_model ('QR Code', [], [], DataCodeHandle)
* 二維碼的創(chuàng)建開(kāi)頭的算子，clear為結(jié)束清除的算子，見(jiàn)下。
set_display_font (WindowHandle, 16, 'mono', 'true', 'false')
dev_set_color ('forest green')
dev_set_draw ('margin')
dev_set_line_width (3)
set_data_code_2d_param (DataCodeHandle, 'default_parameters', 'enhanced_recognition')
* 設(shè)置選定參數(shù)的二維數(shù)據(jù)模型，參數(shù)詳見(jiàn)這個(gè)算子
find_data_code_2d (Image, SymbolXLDs, DataCodeHandle, [], [], ResultHandles, DecodedDataStrings)
* 檢測(cè)和讀取二維代碼符號(hào)，也支持讀取二維數(shù)據(jù)模型的序列，參數(shù)詳見(jiàn)這個(gè)算子
for i := 0 to |ResultHandles| - 1 by 1
select_obj (SymbolXLDs, SymbolXLD, i 1)
get_contour_xld (SymbolXLD, Row, Col)
get_string_extents (WindowHandle, DecodedDataStrings, Ascent, Descent, TxtWidth, TxtHeight)
disp_message (WindowHandle, DecodedDataStrings, 'image', max(Row-50), max([min(Col 30)-TxtWidth/2,1]), 'black', 'true')
endfor
*這段for循環(huán)語(yǔ)句的目的是讓解碼到的字符串（二維碼的內(nèi)容）顯示到二維碼深綠色（forest green上面定義）的解碼區(qū)域框的行列位置。
*disp_message (WindowHandle, DecodedDataStrings, 'window', 12, 12, 'black', 'true')
*如果不需要設(shè)置顯示到區(qū)域框中間的位置，而是顯示到窗體的上方或其他位置，那么不需要上面那段for語(yǔ)句，只需這段信息顯示的語(yǔ)句即可顯示到窗體相應(yīng)位置。
if (|DecodedDataStrings|>0)
disp_continue_message (WindowHandle, 'black', 'true')
stop()
endif
* if語(yǔ)句，當(dāng)解碼一個(gè)（大于0，可設(shè)置多個(gè)）二維碼就暫停攝像頭獲取圖像，直至按F5.
clear_data_code_2d_model (DataCodeHandle)
endwhile
close_framegrabber (AcqHandle)