工控编程吧

标题: halcon shape_trans_xld函数介绍 [打印本页]

作者: qq263946146 时间: 2019-5-22 11:28
标题: halcon shape_trans_xld函数介绍
shape_trans_xld(XLD : XLDTrans : Type : )
shape_trans根据参数Type 转换输入轮廓或l输入的多边形:

convex 凸包

ellipse与输入轮廓或多边形具有相同力矩和面积的椭圆。
封闭的输入轮廓或多边形不能与自身相交，
否则生成的椭圆没有意义
(输入轮廓或多边形是否与自身相交可用test_self_intersection_xld确定)。

outer_circle 最小外接圆

rectangle1 最小外接平行矩形

rectangle2 最小外接旋转矩形

例程
*当前这个例程演示调用shape_trans_xld将轮廓转换成凸包，椭圆，圆，矩形
dev_close_window ()
read_image (Letters, 'letters')
crop_part (Letters, ImagePart, 631, 4, 200, 310)
get_image_size (ImagePart, Width, Height)
dev_open_window (0, 0, Width * 2, Height * 2, 'black', WindowHandle)
dev_display (ImagePart)
dev_set_line_width (2)
set_display_font (WindowHandle, 14, 'mono', 'true', 'false')
Color := ['yellow','forest green']
for Column := 0 to 4 by 1
dev_set_color (Color[0])
gen_rectangle1 (Rectangle, 1, 2 + 40 * Column, 295, 32 + 40 * Column)
reduce_domain (ImagePart, Rectangle, ImageReduced)
threshold_sub_pix (ImageReduced, Border, 100)
dev_set_color (Color[1])
set_tposition (WindowHandle, 290, 5 + 40 * Column)
if (Column == 0)
      *将第一列字母转轮廓换成凸包
      shape_trans_xld (Border, XLDConvex, 'convex')
      dev_display (XLDConvex)
      Message := 'convex\nhull'
endif
if (Column == 1)
      * ellipse with the same moments and area as the input contour
      shape_trans_xld (Border, XLDEllipse, 'ellipse')
      dev_display (XLDEllipse)
      Message := 'ellipse'
endif
if (Column == 2)
      *将第二列字母轮廓转换成圆
      shape_trans_xld (Border, XLDOuterCircle, 'outer_circle')
      dev_display (XLDOuterCircle)
      Message := 'outer\ncircle'
endif
if (Column == 3)
      *将第三列字母转换成平行矩形
      shape_trans_xld (Border, XLDRectangle1, 'rectangle1')
      dev_display (XLDRectangle1)
      Message := 'rect1'
endif
if (Column == 4)
      *将第四列字母轮廓转换成旋转矩形
      shape_trans_xld (Border, XLDRectangle2, 'rectangle2')
      dev_display (XLDRectangle2)
      Message := 'rect2'
endif
disp_message (WindowHandle, Message, 'image', 290, 5 + 40 * Column, Color[1], 'false')
endfor

[halcon]1[/halcon]

欢迎光临工控编程吧 (https://www.gkbc8.com/)