讀取一張圖像

read_image (Image, 'barcode/ean13/ean1305')

*獲取圖像的大小

get_image_size (Image, Width, Height)

*關(guān)閉已經(jīng)打開的窗口

dev_close_window ()

*打開一個新窗口

dev_open_window (0, 0, Width, Height, 'black', WindowHandle)

*顯示圖像

dev_display (Image)

*設(shè)置輸出對象的顏色

dev_set_color ('green')

*設(shè)置區(qū)域的填充方式

dev_set_draw ('margin')

*設(shè)置輸出對象的線寬

dev_set_line_width (3)

*設(shè)置字體信息:字體大小:14,字體:mono,粗體,斜體

set_display_font (WindowHandle, 14, 'mono', 'true', 'false')

*創(chuàng)建一個條碼讀取模版，同時設(shè)定條形和空格的最小寬度

create_bar_code_model ('element_size_min', 1.5, BarCodeHandle)

for Rot := 0 to 360 by 30

*旋轉(zhuǎn)圖像

rotate_image (Image, ImageRotate, Rot, 'weighted')

*顯示圖像

dev_display (ImageRotate)

*獲取圖像大小

get_image_size (ImageRotate, Width, Height)

*改變當(dāng)前激活窗口的大小和位置

dev_set_window_extents (0, 0, Width, Height)

*在圖像上讀取出條碼數(shù)據(jù)和條碼區(qū)域

find_bar_code (ImageRotate, SymbolRegions, BarCodeHandle, 'EAN-13', DecodedDataStrings)

*顯示條碼區(qū)域

dev_display (SymbolRegions)

*獲取條碼的方向:條碼方向與圖像水平軸之間的夾角

get_bar_code_result (BarCodeHandle, 'all', 'orientation', Orientation)

*獲取條碼區(qū)域的面積,中心坐標

area_center (SymbolRegions, Area, Row, Col)

*創(chuàng)建一個十字箭頭的輪廓

gen_arrow_contour_xld (Arrow, Row + sin(rad(Orientation)) * 70, Col - cos(rad(Orientation)) * 70, Row - sin(rad(Orientation)) * 70, Col + cos(rad(Orientation)) * 70, 25, 25)

*顯示十字箭頭的輪廓

dev_display (Arrow)

*在窗口上顯示條碼數(shù)據(jù)

disp_message (WindowHandle, DecodedDataStrings, 'window', 12, 12, 'black', 'true')

stop()

endfor

*刪除條碼模版并清除分配的內(nèi)存

clear_bar_code_model (BarCodeHandle)

審核編輯：劉清