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

admin

获得零件指针
7 O" C+ z/ `  Y" R  o! {; z' a// 获得文件指针
CATDocument * pDoc= NULL;
CATFrmEditor * _pEditor = CATFrmEditor::GeTCurrentEditor();
pDoc = _pEditor->GetDocument();//这里得到了PART 环境下的文档指针
* ^$ n% U; ?. z8 h* v3 J1 aCATInit_var spInitOnDoc(pDoc);
// 得到零件根容器
5 S: R. m& s, F- @3 Y( s4 q. j' n6 t
CATIPrtContainer * piPrtCont =
8 K9 P4 ^1 J1 W(CATIPrtContainer*) spInitOnDoc->GetRootContainer("CATIPrtContainer");
// 得到零件指针
( o7 B7 s+ K! }- L( t9 F- @7 aCATIPrtPart_var spPart = piPrtCont->GetPart();

创建草图
3 ?1 U9 ~- ]' n6 b2 R* ?//初始化草图工厂
3 V( }2 F; e( y5 A+ E8 CCATISketchFactory_var spSketchFactory(piPrtCont);
//在XY plane 上创建草图
! ?( L7 W* b8 b  P" ^8 gCATISketch_var spSketch = spSketchFactory->CreateSketch(spRefPlanes[1]));

创建草图几何
//首先声明编辑草图
spSketch->OpenEdition();
CATI2DWFFactory_var sp2DFactory(spSketch);
  _! d2 ]8 p! R- e) A//这里表示圆心点
" H5 t) e& B* M, L& b; z' Rdouble iPoint[2] = {0.,0.};
//下面创建圆圈
. p. a+ k% M+ \CATISpecObject_var spLine = spSketch ->CreateCircle(iPoint,_Editor003->GetFloatValue());
CATI2DCurve_var spCurveOnLine(spLine);
spCurveOnLine->GetStartPoint();
$ x7 C3 @2 h# a. d2 e! nspCurveOnLine->GetEndPoint();
$ L8 ~* }! D  i/ [6 s1 Q6 g//然后退出草图：
spSketch->CloseEdition();
6 r! Z8 j( U4 Y; L
9 i1 s+ Z( b; J, q/ f2 ^8 v
创建约束
' f7 \! N' w4 x, C2 R  h0 o2 XCATI2DConstraintFactory_var spConstraint2DFactory(spSketch);
7 T! u* X2 ~4 h3 }- F* Q, v//定义spLine1 的半径约束
spConstraint2DFactory->CreateConstraint(spLine, NULL, NULL, NULL, NULL, NULL,
NULL, Cst2DType_Radius, 0, 0 );
//定义spLine1 与坐标原点的同心约束
: S5 D) z3 F. d3 s4 BCATI2DAxis_var spSupport = NULL_var;
spSketch->GetAbsolute2DAxis(spSupport);

8 b( J' J( ]; t1 C0 Q/ j7 B: I) L$ aspConstraint2DFactory->CreateConstraint(spLine, NULL, spSupport->GetOriginPoint(),
NULL, NULL, NULL, NULL, Cst2DType_Concentric, 0, 0 );
' q$ H+ d8 e6 `. R& R, T# \" q
  g: L3 ?2 `' k9 ], I
创建凸台
// 从编辑框中获得援助的高度
double firstLimit = _Editor004->GetFloatValue();
" k5 j# K  M( ^6 m: _double secondLimit = 0.;
: ~7 p! D$ u6 p  V//圆柱的轴向方向为Z 轴方向
- ~9 j4 [/ j1 Q+ ]CATMathDirection dirZ(0., 0., 1.);
//初始化零件工厂
) a7 W$ n, d4 }5 Z; R) s  p9 n/ l8 SCATIPrtFactory_var spPrtFactOnPrtCont(piPrtCont);
& p3 h( g, o0 k' ]//创建凸台
7 w  s4 N& [% }CATISpecObject_var spSpecObj = spPrtFactOnPrtCont->CreatePad(spSketch);
CATIPad_var spPadOnSpecObj(spSpecObj);
, j2 _7 ~2 K( H2 E3 s. \//设置拉伸方向
) b# q! R2 O$ z8 {% ispPadOnSpecObj->ModifyDirection(dirZ);
//设置凸台第一限制类型
spPadOnSpecObj->ModifyEndType(catOffsetLimit);
//设置凸台的高度
$ Q" Z2 m. o/ O3 Q" @3 Q& R+ zspPadOnSpecObj->ModifyEndOffset(firstLimit);
//设置凸台第二限制类型
. V( C0 f4 J& [" E7 MspPadOnSpecObj->ModifyStartType(catOffsetLimit);
5 L/ }& j' _* X7 C. L1 O+ FspPadOnSpecObj->ModifyStartOffset(secondLimit);
2 ]4 d- u; N, W* ~/ b! n: Q' k//将凸台添加在结构树中
! O( ?3 F$ b8 l& DspSpecObj->Update();
% T% K, D6 \7 i3 XCATIGSMProceduralView_var ispProcView = spSpecObj;
' w) o) e8 o/ b  ^7 {4 Z) K/ g' k! Kif (NULL_var != ispProcView ) {HResult rc = ispProcView ->InsertInProceduralView();}
' b  X$ y% [( D* R$ a
1 j) q$ a- u$ ~, X$ K3 ~7 i