zw版【转发·*nvp系列Delphi例程】Delphi 使用 HALCON库件COM控件数据格式转换

时间:2022-01-05 00:15:40

zw版【转发·*nvp系列Delphi例程】Delphi 使用 HALCON库件COM控件数据格式转换

Delphi 使用 HALCON库件COM控件数据格式转换,与IHObjectX接口有关

var
rg0,rg1 : HRegionX;
begin
rg0 := CoHRegionX.Create;
rg0.GenRectangle1(10,10,150,150);
rg1 := CoHRegionX.Create;
rg1.GenRectangle1(200,200,250,250);
rg0 := rg0.ConcatObj(IHObjectX(rg1)); //方法一
rg0 := rg0.ConcatObj(rg1 as IHObjectX); //方法二
rg0 := rg0.Union1;
rg0.DispObj(HWindowXCtrl1.HalconWindow);
end;