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

admin

获得零件指针
; X( O( e3 F& ~' z// 获得文件指针
CATDocument * pDoc= NULL;
CATFrmEditor * _pEditor = CATFrmEditor::GeTCurrentEditor();
# n; w7 j7 O- H! P% ^9 I; ^pDoc = _pEditor->GetDocument();//这里得到了PART 环境下的文档指针
% U0 \- C+ \. g6 X, eCATInit_var spInitOnDoc(pDoc);
// 得到零件根容器

) i6 R$ P( G/ Q  ECATIPrtContainer * piPrtCont =
$ y0 g% D8 ?, S7 n8 a(CATIPrtContainer*) spInitOnDoc->GetRootContainer("CATIPrtContainer");
// 得到零件指针
5 y( Y9 n* `( N5 x; yCATIPrtPart_var spPart = piPrtCont->GetPart();
/ F1 o3 Z2 v2 a2 O
创建草图
' Q- W3 Q5 Z; z* _, S! T5 `8 d+ {//初始化草图工厂
CATISketchFactory_var spSketchFactory(piPrtCont);
//在XY plane 上创建草图
CATISketch_var spSketch = spSketchFactory->CreateSketch(spRefPlanes[1]));
' ?8 D+ D. @( O7 N0 I4 x
1 W6 j- p7 I: d! q8 V创建草图几何
4 a* p  Q) @2 Q7 Q//首先声明编辑草图
+ v  D- e( b, I  ]) |2 CspSketch->OpenEdition();
- K: l: \: K8 Z0 ]8 P9 J7 hCATI2DWFFactory_var sp2DFactory(spSketch);
//这里表示圆心点
+ T6 P. R: e' v; o" I( r1 l9 ]7 vdouble iPoint[2] = {0.,0.};
- A2 }0 ]! b( G//下面创建圆圈
. L7 y: H4 c8 J& q8 Y7 dCATISpecObject_var spLine = spSketch ->CreateCircle(iPoint,_Editor003->GetFloatValue());
CATI2DCurve_var spCurveOnLine(spLine);
  B) j- M# C3 i2 OspCurveOnLine->GetStartPoint();
spCurveOnLine->GetEndPoint();
4 n& [" l4 B, S2 j+ L1 V1 S9 H//然后退出草图：
9 B' O* k: C) g  _6 zspSketch->CloseEdition();
' Y8 p  _, m1 q, f9 ^2 V* q' k$ _( L

0 K5 `! Q1 s* I创建约束
CATI2DConstraintFactory_var spConstraint2DFactory(spSketch);
//定义spLine1 的半径约束
2 Q3 s9 Z+ I4 ~$ |spConstraint2DFactory->CreateConstraint(spLine, NULL, NULL, NULL, NULL, NULL,
  [/ h  m$ u8 s" A6 X% V" b$ FNULL, Cst2DType_Radius, 0, 0 );
//定义spLine1 与坐标原点的同心约束
CATI2DAxis_var spSupport = NULL_var;
& V5 l- r7 f0 w: s, N" zspSketch->GetAbsolute2DAxis(spSupport);
5 Y; T2 V" m) c" B& i9 ~, m
spConstraint2DFactory->CreateConstraint(spLine, NULL, spSupport->GetOriginPoint(),
) G6 @( J2 B2 o& r9 aNULL, NULL, NULL, NULL, Cst2DType_Concentric, 0, 0 );
- q- |5 X$ F$ ?6 x0 Q) y
7 k+ N8 a  K$ N8 n! r6 s
2 e2 S4 w4 x2 b7 K" `  [创建凸台
// 从编辑框中获得援助的高度
9 j2 \' u' c5 I1 g4 idouble firstLimit = _Editor004->GetFloatValue();
double secondLimit = 0.;
//圆柱的轴向方向为Z 轴方向
, ]% }% a, S2 m& l  `3 ?0 d9 aCATMathDirection dirZ(0., 0., 1.);
1 u+ A+ w  ^! C( |3 b$ R//初始化零件工厂
CATIPrtFactory_var spPrtFactOnPrtCont(piPrtCont);
//创建凸台
CATISpecObject_var spSpecObj = spPrtFactOnPrtCont->CreatePad(spSketch);
7 v8 Z' N2 d4 k, Q6 xCATIPad_var spPadOnSpecObj(spSpecObj);
//设置拉伸方向
+ T: V1 O' M, ]6 B5 qspPadOnSpecObj->ModifyDirection(dirZ);
//设置凸台第一限制类型
, i: r& i* v. G6 }* jspPadOnSpecObj->ModifyEndType(catOffsetLimit);
3 Y8 ?: Z8 Y! J+ q( d$ J//设置凸台的高度
# m, V  W# K! f0 T$ PspPadOnSpecObj->ModifyEndOffset(firstLimit);
//设置凸台第二限制类型
4 T% B% ?, x6 O7 z0 X& u' S& }spPadOnSpecObj->ModifyStartType(catOffsetLimit);
spPadOnSpecObj->ModifyStartOffset(secondLimit);
//将凸台添加在结构树中
spSpecObj->Update();
4 ^8 R. A( A9 h' Q% a/ y5 B5 KCATIGSMProceduralView_var ispProcView = spSpecObj;
if (NULL_var != ispProcView ) {HResult rc = ispProcView ->InsertInProceduralView();}
3 @; i7 P3 C3 y) ^" b- W7 P
/ A( r) ^9 Z4 |2 ]6 m6 E' z% _