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

admin

获得零件指针
4 ?. m2 x. f0 R// 获得文件指针
3 F' Y) }  s* X, J' `4 h& BCATDocument * pDoc= NULL;
CATFrmEditor * _pEditor = CATFrmEditor::GeTCurrentEditor();
$ \/ ~! T% W7 A3 _: q  |* {" NpDoc = _pEditor->GetDocument();//这里得到了PART 环境下的文档指针
CATInit_var spInitOnDoc(pDoc);
6 f7 P5 n6 o' Q3 O// 得到零件根容器
  e8 @8 _# o" H9 y* Z/ E+ r' ^' f7 t
& E* u% J. Q2 z) m- A* I4 f. pCATIPrtContainer * piPrtCont =
* G9 p& Y) R) v/ p6 F. L: ]  V(CATIPrtContainer*) spInitOnDoc->GetRootContainer("CATIPrtContainer");
// 得到零件指针
CATIPrtPart_var spPart = piPrtCont->GetPart();

1 i. X+ u' @1 r5 U: h- C创建草图
//初始化草图工厂
0 r$ N7 j7 E5 `( t% D$ pCATISketchFactory_var spSketchFactory(piPrtCont);
//在XY plane 上创建草图
" S* k/ {1 y- rCATISketch_var spSketch = spSketchFactory->CreateSketch(spRefPlanes[1]));
2 e/ f+ X/ F' h
创建草图几何
//首先声明编辑草图
spSketch->OpenEdition();
CATI2DWFFactory_var sp2DFactory(spSketch);
//这里表示圆心点
- X% c, u& N% u4 Z6 x# Ldouble iPoint[2] = {0.,0.};
- z0 F. A* T) ?2 M4 |: p6 _//下面创建圆圈
' S6 h* o: X, S* I! i0 s1 N. nCATISpecObject_var spLine = spSketch ->CreateCircle(iPoint,_Editor003->GetFloatValue());
. g4 U- p( T6 x& V) E7 ^CATI2DCurve_var spCurveOnLine(spLine);
spCurveOnLine->GetStartPoint();
spCurveOnLine->GetEndPoint();
: `6 K3 n2 n% B4 ^//然后退出草图：
4 Z7 I2 H5 K4 a; jspSketch->CloseEdition();
6 R5 h2 T8 r" A

5 j# ^4 x8 F3 L# M  w+ t( j9 I创建约束
CATI2DConstraintFactory_var spConstraint2DFactory(spSketch);
//定义spLine1 的半径约束
* W* w6 w8 V! W2 @( B- vspConstraint2DFactory->CreateConstraint(spLine, NULL, NULL, NULL, NULL, NULL,
NULL, Cst2DType_Radius, 0, 0 );
//定义spLine1 与坐标原点的同心约束
( Q9 \- {6 F) U+ n9 U8 C, V5 ^CATI2DAxis_var spSupport = NULL_var;
spSketch->GetAbsolute2DAxis(spSupport);

) l" g0 A* i2 a! N4 B$ D2 ]3 t9 @spConstraint2DFactory->CreateConstraint(spLine, NULL, spSupport->GetOriginPoint(),
NULL, NULL, NULL, NULL, Cst2DType_Concentric, 0, 0 );

$ v. [7 V# j) k6 b
; j1 `3 c' j7 C. f8 Q; `创建凸台
// 从编辑框中获得援助的高度
double firstLimit = _Editor004->GetFloatValue();
double secondLimit = 0.;
" e2 v0 q, U* H' t0 S  O' H//圆柱的轴向方向为Z 轴方向
3 p2 G5 \+ z5 J, A+ \3 B6 ACATMathDirection dirZ(0., 0., 1.);
4 A% @5 s' k1 _//初始化零件工厂
' @! c& ?5 ^8 A% MCATIPrtFactory_var spPrtFactOnPrtCont(piPrtCont);
! P! z  J% R. n) m& U. c4 J! h, j: ^//创建凸台
, [6 A* f. M( T" n4 r. c  v1 n% iCATISpecObject_var spSpecObj = spPrtFactOnPrtCont->CreatePad(spSketch);
+ A. R6 D& ~$ v6 y/ b- a) b5 yCATIPad_var spPadOnSpecObj(spSpecObj);
//设置拉伸方向
, z/ j+ c+ m: e. \' v+ wspPadOnSpecObj->ModifyDirection(dirZ);
//设置凸台第一限制类型
spPadOnSpecObj->ModifyEndType(catOffsetLimit);
) \& x" l- F  t& S//设置凸台的高度
spPadOnSpecObj->ModifyEndOffset(firstLimit);
0 T& e# ~& i$ @$ h! u//设置凸台第二限制类型
4 B& b$ P* E+ Y& g. _1 gspPadOnSpecObj->ModifyStartType(catOffsetLimit);
/ i6 E0 K# [4 P( VspPadOnSpecObj->ModifyStartOffset(secondLimit);
1 Y1 q$ l! y0 c. E3 O# K) N//将凸台添加在结构树中
spSpecObj->Update();
CATIGSMProceduralView_var ispProcView = spSpecObj;
if (NULL_var != ispProcView ) {HResult rc = ispProcView ->InsertInProceduralView();}
$ B3 f4 F- h) [+ ]