erase_contour_xld实现轮廓线的擦除

参数：

1. erase_contour_xld(Contour : ContourOut : Radius : )

复制代码

参数说明：

1. Contour 传入单轮廓
   
2. ContourOut 传出被擦除的单轮廓
   
3. Radius 擦除半径

复制代码

外部算子源码：

1. *传入轮廓（非polygon多边形）进行擦除,左键点击擦除，右键完成
   
2. dev_get_window (WindowHandle)
   
3. gen_circle_contour_xld (ContCircle, 0, 0, Radius, 0, 6.28318, 'positive', 1)
   
4. gen_region_contour_xld (Contour, Region, 'margin')
   
5. dev_display(Region)
   
6. while(true)
   
7.     try
   
8.         get_mbutton (WindowHandle, Row1, Column1, Button)
   
9.         if(4 == Button)
   
10.             break
    
11.         endif
    
12.         set_system ('flush_graphic', 'false')
    
13.         vector_angle_to_rigid (0, 0, 0, Row1, Column1, 0, HomMat2D)
    
14.         affine_trans_contour_xld (ContCircle, ContoursAffineTrans, HomMat2D)
    
15.         gen_region_contour_xld (ContoursAffineTrans, RegionCircle, 'filled')
    
16.         difference (Region, RegionCircle, Region)
    
17. 
    
18.         dev_clear_window ()
    
19.         set_system ('flush_graphic', 'true')
    
20.         dev_display(Region)
    
21.     catch (Exception)
    
22.     endtry
    
23. endwhile
    
24. skeleton (Region, Skeleton)
    
25. gen_contours_skeleton_xld (Skeleton, ContourOut, 1, 'filter')
    
26. return ()

复制代码

可自行根据参数表封装修改
erase_contour_xld.hdvp (1.64 KB, 下载次数: 42)

2023-3-31 16:52 上传

点击文件名下载附件
阅读权限: 10

这种方法对复杂轮廓的处理有问题，而且轮廓和区域转来转去的损失精度

halcon2016 发表于 2023-6-28 16:28
这种方法对复杂轮廓的处理有问题，而且轮廓和区域转来转去的损失精度

是的，这只是大致思路，不算是最佳优化代码。

我看到有人写出用橡皮擦消除轮廓，橡皮擦大小还可以自定义，不知道是怎么实现的，有知道的回复下，谢谢

zrp785962235 发表于 2023-7-3 13:03
我看到有人写出用橡皮擦消除轮廓，橡皮擦大小还可以自定义，不知道是怎么实现的，有知道的回复下，谢谢 ...

就是结构体大小也可以定义啊，比如圆形就是半径，长方形就是尺寸大小。

Criss 发表于 2023-7-3 18:40
就是结构体大小也可以定义啊，比如圆形就是半径，长方形就是尺寸大小。 ...

如何能在窗口显示出擦除工具轮廓，并且能实时移动清除轮廓？试好多久都不行，有没有方法提供下，非常感谢

不错，又学了一个新知识

Criss 发表于 2023-6-28 16:48
是的，这只是大致思路，不算是最佳优化代码。

matching 向导工具里做模板轮廓有个删除的小工具，不知道它如何实现的

可以实现，但是可能是halcon bug， gen_region_contour_xld (Contour, Region, 'margin')，轮廓有拐弯的地方，会产生多余的线