catia caa二次开发详细教程9创建圆角三角形

1、CATIA CAA 二次开发 详细（9）创建圆角三角形创建三个点(参见将点连成线(参见5)6)3) 通过三点创建一个参考平面，后面进行圆弧倒角时要用到该平面。CATIGSMPlane3PoCreatePlane(spPos_var Supportplane = spGSMFactory-1, spPo2,spPo3);CATISpecObject_var spSupportplane = Supportplane;4) 创建倒角半径的参数：CATICkeParm_var Radius1 = NULL_var; CATICkeMagnitude_var spRadMag = spParamDic

2、tionary-FindMagnitude(LENGTH);CATUnicodeString name(Radius 1);Radius1 = spParmFactory-CreateDimen5) 创建倒角：:(spRadMag,name, .01);CATIGSMCorner_var Corner1 = spGSMFactory-CreateCorner(spLine1,spLine2, spSupportplane,Radius1,CATGSMSameOrienCATGSMSameOrienFALSE);ion,ion,CATISpecObject_var spCorner1 = Cor

3、ner1;6) 裁剪去多余的线和点：CATIGSMSplit_var Split1 = spGSMFactory-CreateSplit(spLine1,spRadius1,CATGSMSameOrienion);CATISpecObject_var spSplit1 = Split1;CATIGSMSplit_var Split1a = spGSMFactory-CreateSplit(spSplit1,spRadius3,CATGSMInvertOrienion);CATISpecObject_var spSplit1a = Split1a;7) 将线和圆弧依次连接起来，创建一个序列：CI

4、STV(CATISpecObject_var) joincurves;joincurves.Append(spSplit1a);joincurves.Append(spSplit2a); joincurves.Append(spSplit3a); joincurves.Append(spRadius1); joincurves.Append(spRadius2); joincurves.Append(spRadius3);8)在讲序列连接起来之前，需要创建一个最小的结合距离： CATICkeParm_var Mergedist = NULL_var; CATICkeMagnitude_var

5、spMergedist = spParamDictionary-FindMagnitude(LENGTH);CATUnicodeString mergename(Merge Distance);Mergedist = spParmFactory-CreateDimenmergename,.0001);9)连接起来并到视图中：(spMergedist,Now we can jothe part.his list of objectso a single shand insert itoCATIGSMAssemble_var CurveAssy = spGSMFactory-CreateAssemble(joincurves, Mergedist,FALSE);CATISpecObject_var spCurveAssy = CurveAssy;spCurveAssy-Update();C