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

admin

获得零件指针
// 获得文件指针
CATDocument * pDoc= NULL;
CATFrmEditor * _pEditor = CATFrmEditor::GeTCurrentEditor();
pDoc = _pEditor->GetDocument();//这里得到了PART 环境下的文档指针
CATInit_var spInitOnDoc(pDoc);
; h2 i! A5 C7 }6 D7 x// 得到零件根容器
8 w) D: q" E- N
CATIPrtContainer * piPrtCont =
(CATIPrtContainer*) spInitOnDoc->GetRootContainer("CATIPrtContainer");
5 v$ u9 I. s: A" w( L, y- k// 得到零件指针
  l& C+ G& n4 vCATIPrtPart_var spPart = piPrtCont->GetPart();
" e  N) N" P4 W# l
创建草图
//初始化草图工厂
1 Q, b7 l' P) |4 s  I5 |3 t4 O- k2 |CATISketchFactory_var spSketchFactory(piPrtCont);
$ ?1 s2 M* S* _" Y: S$ ^//在XY plane 上创建草图
6 C/ n. N7 V; @& s/ U5 ECATISketch_var spSketch = spSketchFactory->CreateSketch(spRefPlanes[1]));

创建草图几何
//首先声明编辑草图
" h& K$ P! M; O6 ?" q& BspSketch->OpenEdition();
CATI2DWFFactory_var sp2DFactory(spSketch);
//这里表示圆心点
double iPoint[2] = {0.,0.};
//下面创建圆圈
( {4 n. v2 Y: n1 ZCATISpecObject_var spLine = spSketch ->CreateCircle(iPoint,_Editor003->GetFloatValue());
CATI2DCurve_var spCurveOnLine(spLine);
spCurveOnLine->GetStartPoint();
spCurveOnLine->GetEndPoint();
) U% p0 G( T& M: H5 D& E, j& k//然后退出草图：
spSketch->CloseEdition();

( n' H2 f8 Y% R, q4 u; B" k
( _8 @$ y, c, B  z5 l/ n7 m1 J8 w创建约束
CATI2DConstraintFactory_var spConstraint2DFactory(spSketch);
  c* o' @6 u* u0 N% U! T' H$ N//定义spLine1 的半径约束
spConstraint2DFactory->CreateConstraint(spLine, NULL, NULL, NULL, NULL, NULL,
NULL, Cst2DType_Radius, 0, 0 );
0 X' Y) J' W3 \7 y* _+ a" ~9 I7 Y//定义spLine1 与坐标原点的同心约束
CATI2DAxis_var spSupport = NULL_var;
spSketch->GetAbsolute2DAxis(spSupport);
. ~- p0 o& ]; n+ P
" y- f% B/ N- t- nspConstraint2DFactory->CreateConstraint(spLine, NULL, spSupport->GetOriginPoint(),
NULL, NULL, NULL, NULL, Cst2DType_Concentric, 0, 0 );
5 i2 ]& h: B  h  E  \
! K( d7 g4 e! j) [. X. v
创建凸台
$ c9 M2 D3 B4 T% z// 从编辑框中获得援助的高度
. }4 y! r; e0 Q: {% l9 a; adouble firstLimit = _Editor004->GetFloatValue();
double secondLimit = 0.;
//圆柱的轴向方向为Z 轴方向
9 {$ e+ e6 P/ {CATMathDirection dirZ(0., 0., 1.);
//初始化零件工厂
# `/ L! C2 T5 U2 G' `# _; TCATIPrtFactory_var spPrtFactOnPrtCont(piPrtCont);
//创建凸台
( V' e4 h9 e. cCATISpecObject_var spSpecObj = spPrtFactOnPrtCont->CreatePad(spSketch);
CATIPad_var spPadOnSpecObj(spSpecObj);
//设置拉伸方向
spPadOnSpecObj->ModifyDirection(dirZ);
//设置凸台第一限制类型
8 o/ W8 i; x4 e+ `) Q7 fspPadOnSpecObj->ModifyEndType(catOffsetLimit);
1 R0 Y2 C  A' s4 N# B2 ?% c//设置凸台的高度
5 C* d7 \% o# L( q, H" UspPadOnSpecObj->ModifyEndOffset(firstLimit);
//设置凸台第二限制类型
4 R) x3 d) D  j" J/ G2 f5 uspPadOnSpecObj->ModifyStartType(catOffsetLimit);
& E. {' s" W: M) ~1 R$ U# hspPadOnSpecObj->ModifyStartOffset(secondLimit);
//将凸台添加在结构树中
spSpecObj->Update();
CATIGSMProceduralView_var ispProcView = spSpecObj;
if (NULL_var != ispProcView ) {HResult rc = ispProcView ->InsertInProceduralView();}
3 q( W; R4 A( s