Catia二次开发源码分享：创建圆柱体实例

admin

获得零件指针
( y9 p6 n, E" F( q0 d& z// 获得文件指针
8 M: x$ n. [8 A+ w" \1 OCATDocument * pDoc= NULL;
9 j+ {) f4 o; U3 t, T5 RCATFrmEditor * _pEditor = CATFrmEditor::GeTCurrentEditor();
pDoc = _pEditor->GetDocument();//这里得到了PART 环境下的文档指针
% d  Y" o% [) b! i2 }3 yCATInit_var spInitOnDoc(pDoc);
// 得到零件根容器
! ^: Q. |4 b" |' g
CATIPrtContainer * piPrtCont =
(CATIPrtContainer*) spInitOnDoc->GetRootContainer("CATIPrtContainer");
// 得到零件指针
CATIPrtPart_var spPart = piPrtCont->GetPart();
* [, r& ]' ~& E/ v
' R+ l& B) u, |/ S创建草图
//初始化草图工厂
. Z$ _9 P- J+ n6 X* MCATISketchFactory_var spSketchFactory(piPrtCont);
//在XY plane 上创建草图
CATISketch_var spSketch = spSketchFactory->CreateSketch(spRefPlanes[1]));

创建草图几何
//首先声明编辑草图
spSketch->OpenEdition();
) E1 J8 \5 L8 X5 y/ R& uCATI2DWFFactory_var sp2DFactory(spSketch);
//这里表示圆心点
3 H; u) ^' q9 e/ A6 udouble iPoint[2] = {0.,0.};
//下面创建圆圈
CATISpecObject_var spLine = spSketch ->CreateCircle(iPoint,_Editor003->GetFloatValue());
CATI2DCurve_var spCurveOnLine(spLine);
spCurveOnLine->GetStartPoint();
& y- r/ Z, V. R+ i% M8 cspCurveOnLine->GetEndPoint();
//然后退出草图：
spSketch->CloseEdition();
! L6 K- {3 [0 @' a/ @5 V$ f

3 X. @; X  s$ m, m3 m" c) X+ _创建约束
* o# t& n) b) oCATI2DConstraintFactory_var spConstraint2DFactory(spSketch);
//定义spLine1 的半径约束
spConstraint2DFactory->CreateConstraint(spLine, NULL, NULL, NULL, NULL, NULL,
NULL, Cst2DType_Radius, 0, 0 );
//定义spLine1 与坐标原点的同心约束
1 ^+ M  S2 l) c0 }9 ZCATI2DAxis_var spSupport = NULL_var;
spSketch->GetAbsolute2DAxis(spSupport);
: K. z( n/ W% @: w& E" B# K
spConstraint2DFactory->CreateConstraint(spLine, NULL, spSupport->GetOriginPoint(),
, c# \. s7 S/ A9 b, @NULL, NULL, NULL, NULL, Cst2DType_Concentric, 0, 0 );
4 R: m2 c7 e; d4 k; g
( ~; |9 _6 V2 I1 J7 `9 g! Y& l
# ^1 a" z" H  }  k+ q& u4 \  G创建凸台
// 从编辑框中获得援助的高度
7 ~: u: v3 @" xdouble firstLimit = _Editor004->GetFloatValue();
8 |5 e1 V5 u, L  a& Q; l/ G' g: Kdouble secondLimit = 0.;
6 |- ?( y3 `3 w) t//圆柱的轴向方向为Z 轴方向
& T. C- E8 o" _, `CATMathDirection dirZ(0., 0., 1.);
' l0 l4 C: w4 G/ ^//初始化零件工厂
. ^" p1 ?" i( G: G! dCATIPrtFactory_var spPrtFactOnPrtCont(piPrtCont);
//创建凸台
; j# ~. y/ n0 C5 g) X$ `* x) {) {CATISpecObject_var spSpecObj = spPrtFactOnPrtCont->CreatePad(spSketch);
1 B- t, j0 V- J' WCATIPad_var spPadOnSpecObj(spSpecObj);
//设置拉伸方向
spPadOnSpecObj->ModifyDirection(dirZ);
//设置凸台第一限制类型
: n4 Q4 b0 [2 H* a, X2 pspPadOnSpecObj->ModifyEndType(catOffsetLimit);
9 [9 g1 V7 T+ h" r3 ]' I% {//设置凸台的高度
# g1 L- Z& o, w- P; FspPadOnSpecObj->ModifyEndOffset(firstLimit);
$ M8 z1 t0 c' k//设置凸台第二限制类型
, ]" ^* y0 ?$ y# espPadOnSpecObj->ModifyStartType(catOffsetLimit);
spPadOnSpecObj->ModifyStartOffset(secondLimit);
//将凸台添加在结构树中
spSpecObj->Update();
4 [) P' l, ^# ~+ eCATIGSMProceduralView_var ispProcView = spSpecObj;
0 N1 b; M9 ^. D4 [$ `! U5 Wif (NULL_var != ispProcView ) {HResult rc = ispProcView ->InsertInProceduralView();}
) V0 X6 y- u# n+ ~