zw版【转发·台湾nvp系列Delphi例程】HALCON SelectObj
zw版【转发·台湾nvp系列Delphi例程】HALCON SelectObj
procedure TForm1.Button1Click(Sender: TObject);
var
img : HImageX;
w, h : OleVariant;
rg, rg1 : HRegionX;
ht : HTupleX;
begin
ht := CoHTupleX.Create;
img := CoHImageX.Create;
img.ReadImage('rings_and_nuts');
w := img.GetImageSize(h);
HWindowXCtrl1.HalconWindow.SetPart(0, 0, h - 1, w - 1);
img.DispObj(HWindowXCtrl1.HalconWindow );
rg := img.Threshold(0, 128);
rg := rg.ClipRegion(10, 10, h - 10, w - 10);
HWindowXCtrl2.HalconWindow.SetPart(0, 0, h - 1, w - 1);
img.DispObj(HWindowXCtrl2.HalconWindow);
HWindowXCtrl2.HalconWindow.SetDraw('margin');
HWindowXCtrl2.HalconWindow.SetColored(12);
rg.DispObj(HWindowXCtrl2.HalconWindow);
HWindowXCtrl2.HalconWindow.SetColor('red');
HWindowXCtrl2.HalconWindow.SetTposition(10, 10);
HWindowXCtrl2.HalconWindow.WriteString('Object Nums : ' + IntToStr(rg.CountObj));
rg1 := rg.Connection;
HWindowXCtrl3.HalconWindow.SetPart(0, 0, h - 1, w - 1);
img.DispObj(HWindowXCtrl3.HalconWindow);
HWindowXCtrl3.HalconWindow.SetDraw('margin');
HWindowXCtrl3.HalconWindow.SetColored(12);
rg1.DispObj(HWindowXCtrl3.HalconWindow);
HWindowXCtrl3.HalconWindow.SetColor('red');
HWindowXCtrl3.HalconWindow.SetTposition(10, 10);
HWindowXCtrl3.HalconWindow.WriteString('Object Nums : ' + IntToStr(rg1.CountObj));
rg1 := rg1.SelectObj(ht.TupleConcat(3, 4));
HWindowXCtrl4.HalconWindow.SetPart(0, 0, h - 1, w - 1);
img.DispObj(HWindowXCtrl4.HalconWindow);
HWindowXCtrl4.HalconWindow.SetDraw('margin');
HWindowXCtrl4.HalconWindow.SetColored(12);
rg1.DispObj(HWindowXCtrl4.HalconWindow);
HWindowXCtrl4.HalconWindow.SetColor('red');
HWindowXCtrl4.HalconWindow.SetTposition(10, 10);
HWindowXCtrl4.HalconWindow.WriteString('Object Nums : ' + IntToStr(rg1.CountObj));
end;
最新文章
- 感知器、逻辑回归和SVM的求解
- ORA-04021：timeout occurred while waiting to lock object
- [转]phoneGap3.0安装步骤(以windows下的android环境为例)：
- UFLDL教程（五）之self-taught learning
- Decimal Basic 学习笔记（1）
- DFS-leetcode Combination Sum I/I I
- js所有函数集合
- 一个强大的封装好的pdo处理类
- DRF框架之视图方法的几个封装好的模块介绍(第三天)
- 个渣渣C语言之数组
- sql server备份和还原
- Java中的回车换行符/n /r /t
- STM32f103的数电采集电路的DMA设计和使用优化程序
- springMVC注解（一）Controller
- Failed to start docker.service: Unit not found.
- 读书笔记(03) - 性能 - JavaScript高级程序设计
- Android——开源框架Universal-Image-Loader + Fragment使用+轮播广告
- windows下启动某程序提示缺失**.dll文件的处理方法
- Winform的学习
- WebDAV漏洞直接远程溢出拿下服务器