halcon分别求取Region区域顶点和最高点

Word编辑器可以生成很多形状，举例七角星

 求顶点和最高点的源码如下：

*求取区域顶点,方法1
dev_close_window()
read_image (Image1, 'testpic/求取区域顶点.png')
dev_open_window_fit_image (Image1, 0, 0, -1, -1, WindowHandle)
points_foerstner (Image1, 1, 2, 3, 200, 0.3, 'gauss', 'false', RowJunctions, ColumnJunctions, CoRRJunctions, CoRCJunctions, CoCCJunctions, RowArea, ColumnArea, CoRRArea, CoRCArea, CoCCArea)
dev_display (Image1)
for Index := 0 to |RowJunctions|-1 by 1
    disp_cross (WindowHandle, RowJunctions[Index], ColumnJunctions[Index], 50, 0)
endfor
stop()

*求取区域顶点,方法2
*五角星的顶点，直接补个外凸多边形，拿多边形的内边界和五角星取交集
invert_image (Image1, ImageInvert)
threshold (ImageInvert, Region, 128, 255)
shape_trans (Region, RegionTrans, 'convex')
boundary (RegionTrans, RegionBorder, 'inner')
intersection (RegionBorder, Region, RegionIntersection)
connection (RegionIntersection, ConnectedRegions)
area_center (ConnectedRegions, Area, Row, Column)
dev_display (Image1)
for Index := 0 to |Row|-1 by 1
    disp_cross (WindowHandle, Row, Column, 50, 0)
endfor
stop()

*给你一个region，怎样得出区域的最高点
invert_image (Image1, ImageInvert)
threshold (ImageInvert, Region, 128, 255)
shape_trans (Region, RegionTrans, 'rectangle1')
move_region (RegionTrans, RegionMoved, 1, 0)
difference (Region, RegionMoved, RegionDifference)
area_center (RegionDifference, Area, Row, Column)
dev_display (Image1)
disp_cross (WindowHandle, Row, Column, 50, 0)
stop()

 效果图：

各个顶点

最高点