《zw版·Halcon-delphi系列原创教程》 邮票艺术品自动分类脚本
《zw版·Halcon-delphi系列原创教程》 邮票艺术品自动分类脚本
邮票艺术品自动分类脚本,是个综合应用,有不同尺寸图像的自动识别、区域分割
还有作品附近文字的自动分割
此类项目,字符都不是标准工业字符,ocr需要重新建库,这里就略过了。
ps,脚本很短,才40多行,有兴趣的网友,可以自己改为delphi、vc、vb版
1 gen_rectangle1 (Rect, 0, 0, 5, 5) 2 dev_update_var ('off') 3 dev_update_window ('off') 4 dev_close_window () 5 read_image (Image, 'stamps/swiss1') 6 get_image_size (Image, Width, Height) 7 dev_open_window (0, 0, round(Width / 1.5), round(Height / 1.5), 'black', WindowID) 8 set_display_font (WindowID, 14, 'mono', 'true', 'false') 9 for i := 1 to 9 by 1 10 read_image (Image, 'stamps/swiss' + i) 11 get_image_size (Image, Width, Height) 12 dev_set_part (0, 0, Height - 1, Width - 1) 13 dev_display (Image) 14 dev_set_draw ('fill') 15 threshold (Image, Dark, 0, 110) 16 fill_up (Dark, DarkFilled) 17 connection (DarkFilled, ConnectedRegions) 18 select_shape (ConnectedRegions, PotStamps, 'area', 'and', 10000, 100000000) 19 opening_rectangle1 (PotStamps, Stamps, 10, 10) 20 select_shape (ConnectedRegions, Lines, 'convexity', 'and', 0, 0.3) 21 select_shape (ConnectedRegions, Character, 'area', 'and', 10, 500) 22 top_hat (Lines, Rect, RegionTopHat) 23 connection (RegionTopHat, ConnTopHat) 24 select_shape (ConnTopHat, AllLines, 'area', 'and', 150, 1000000) 25 union1 (Character, CharacterUnion) 26 dilation_rectangle1 (CharacterUnion, Words, 8, 2) 27 connection (Words, SingleWords) 28 shape_trans (SingleWords, RectWords, 'rectangle1') 29 dev_set_draw ('margin') 30 dev_display (Image) 31 dev_set_color ('red') 32 dev_display (AllLines) 33 dev_set_color ('green') 34 dev_display (Stamps) 35 dev_set_color ('yellow') 36 dev_display (Character) 37 dev_set_color ('blue') 38 dev_display (RectWords) 39 if (i < 9) 40 disp_continue_message (WindowID, 'black', 'true') 41 endif 42 stop () 43 endfor 44 dev_display (Image)
【《zw版·Halcon-delphi系列原创教程》,网址,cnblogs.com/ziwang/】
转载于:https://www.cnblogs.com/ziwang/p/4856873.html
《zw版·Halcon-delphi系列原创教程》 邮票艺术品自动分类脚本相关推荐
- 【《zw版·Halcon与delphi系列原创教程》 zw_halcon人脸识别
[<zw版·Halcon与delphi系列原创教程>zw_halcon人脸识别 经常有用户问,halcon人脸识别方面的问题. 可能是cv在人脸识别.车牌识别方面的投入太多了. 其实,人脸 ...
- 《zw版Halcon与delphi系列原创教程》发布说明
<zw版Halcon与delphi系列原创教程>发布说明 zw转载的<台湾nvp系列halcon-delphi教程>,虽然很多,不过基本上都是从cnc.数控角度的demo.. ...
- 《zw版·ddelphi与halcon系列原创教程》Halcon的短板与delphi
[<zw版·delphi与Halcon系列原创教程> Halcon的短板与delphi 看过<delphi与Halcon系列>blog的网友都知道,笔者对Halcon一直是非常 ...
- 《zw版·delphi与halcon系列原创教程》zw版_THImagex控件函数列表
<zw版·delphi与halcon系列原创教程>zw版_THImagex控件函数列表 Halcon虽然庞大,光HALCONXLib_TLB.pas文件,源码就要7w多行,但核心控件就是两 ...
- 《zw版·Halcon-delphi系列原创教程》 zw版-Halcon常用函数Top100中文速查手册
<zw版·Halcon-delphi系列原创教程> zw版-Halcon常用函数Top100中文速查手册 Halcon函数库非常庞大,v11版有1900多个算子(函数). 这个Top版,对 ...
- 《zw版·Halcon-delphi系列原创教程》 Halcon分类函数011,ocr,字符识别
<zw版·Halcon-delphi系列原创教程> Halcon分类函数011,ocr,字符识别 为方便阅读,在不影响说明的前提下,笔者对函数进行了简化: :: 用符号"**&q ...
- 《zw版·Halcon-delphi系列原创教程》 Halcon分类函数015,vector矢量
<zw版·Halcon-delphi系列原创教程> Halcon分类函数015,vector矢量 为方便阅读,在不影响说明的前提下,笔者对函数进行了简化: :: 用符号"**&q ...
- 《zw版·Halcon-delphi系列原创教程》 Halcon分类函数013,shape模型
<zw版·Halcon-delphi系列原创教程> Halcon分类函数013,shape模型 为方便阅读,在不影响说明的前提下,笔者对函数进行了简化: :: 用符号"**&qu ...
- 《zw版·Halcon-delphi系列原创教程》 Halcon分类函数017·point点函数
<zw版·Halcon-delphi系列原创教程> Halcon分类函数017·point点函数 为方便阅读,在不影响说明的前提下,笔者对函数进行了简化: :: 用符号"**&q ...
最新文章
- BERT的成功是否依赖于虚假相关的统计线索?
- FeignClient源码深度解析
- Redis中五大数据结构的底层实现
- 为什么要重写hashcode( )和equals( )?
- 05-WIFI通讯客户端搭建
- Qt文档阅读笔记-Button QML Type官方解析及实例
- Mr.J-- jQuery学习笔记(二)--核心函数jQuery对象
- 如何构建你的聊天界面
- 如何过滤掉xml中的转义字符_水肥一体化应用中如何选择过滤器?
- Android反射set/get系统属性(SystemProperties)
- Java的继承 以学生管理系统为例
- 基于国产全志A40I的机器人示教器解决方案
- python诗歌文件格式处理_python实现诗歌游戏(类继承)
- 划线法构造三角形单元插值函数
- 期货市场间竞争的比较优势分析
- DELL R630 如何利用IDRAC升级BIOS固件和IDARC
- Unity小地图的实现
- 质量管理三个概念:QC、QA和QM,你能分得清吗?
- python大数据入门书籍推荐书目_python 大数据入门书籍
- 学习淘宝分享出来的链接web检测打开原生App
热门文章
- Collection集合
- 地图显示---英文、中英文地图
- Python数据分析实战之葡萄酒质量分析
- 蓝桥杯嵌入式第十二届省赛真题
- 黑马JAVA P44 猜数字游戏
- 19年的桌面KDE的风雨和陪伴,没有什么能够割舍
- 持续帮助客户成功,用友YonSuite全场景SaaS服务有什么特别之处?
- package is corrupt, exception while verifying: undefined method `size' for nil:NilClass (NoMethodErr
- 寻找子树和子孙树 ,家谱树
- nginx配置访问本地静态资源