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

admin

获得零件指针
// 获得文件指针
CATDocument * pDoc= NULL;
2 e& R, b1 x: M% _; a+ kCATFrmEditor * _pEditor = CATFrmEditor::GeTCurrentEditor();
pDoc = _pEditor->GetDocument();//这里得到了PART 环境下的文档指针
CATInit_var spInitOnDoc(pDoc);
// 得到零件根容器

CATIPrtContainer * piPrtCont =
; h& U# x, U) ~' D9 G(CATIPrtContainer*) spInitOnDoc->GetRootContainer("CATIPrtContainer");
// 得到零件指针
CATIPrtPart_var spPart = piPrtCont->GetPart();
8 u. z( p% Q; p/ T! u! p
创建草图
//初始化草图工厂
# O( c  c# s) y' |CATISketchFactory_var spSketchFactory(piPrtCont);
//在XY plane 上创建草图
6 e9 M; `8 m. z% fCATISketch_var spSketch = spSketchFactory->CreateSketch(spRefPlanes[1]));

创建草图几何
- k6 s" E, s) O  O0 D//首先声明编辑草图
spSketch->OpenEdition();
2 v" X0 ~: t4 O" JCATI2DWFFactory_var sp2DFactory(spSketch);
//这里表示圆心点
double iPoint[2] = {0.,0.};
: {# C; H7 |- ]* Q" U$ ?, c//下面创建圆圈
CATISpecObject_var spLine = spSketch ->CreateCircle(iPoint,_Editor003->GetFloatValue());
CATI2DCurve_var spCurveOnLine(spLine);
3 B3 {% h, o8 W: a8 x3 BspCurveOnLine->GetStartPoint();
spCurveOnLine->GetEndPoint();
. ~+ j5 c$ S. |/ _, F//然后退出草图：
spSketch->CloseEdition();


) R  W4 y3 P/ K创建约束
1 e4 p4 h+ l% ~% U% T" f0 e" VCATI2DConstraintFactory_var spConstraint2DFactory(spSketch);
" C+ ]7 Z4 C" O# l" V. a5 o* o& _//定义spLine1 的半径约束
8 y0 E' E; z9 ]spConstraint2DFactory->CreateConstraint(spLine, NULL, NULL, NULL, NULL, NULL,
6 V6 g* R( w* f* g# i# M: M" V0 nNULL, Cst2DType_Radius, 0, 0 );
//定义spLine1 与坐标原点的同心约束
CATI2DAxis_var spSupport = NULL_var;
+ y: Y0 [; O7 m2 P, N. lspSketch->GetAbsolute2DAxis(spSupport);
1 N3 Q9 s. N2 d4 Z; a2 ]
spConstraint2DFactory->CreateConstraint(spLine, NULL, spSupport->GetOriginPoint(),
NULL, NULL, NULL, NULL, Cst2DType_Concentric, 0, 0 );


创建凸台
+ j5 x. ^: o8 U) _+ u// 从编辑框中获得援助的高度
double firstLimit = _Editor004->GetFloatValue();
) K& j: `9 E' S# y5 \' Ldouble secondLimit = 0.;
' K( b" j8 A( n. x9 q$ P0 _//圆柱的轴向方向为Z 轴方向
CATMathDirection dirZ(0., 0., 1.);
6 y( V3 G& ^/ S7 L6 H8 V7 G//初始化零件工厂
CATIPrtFactory_var spPrtFactOnPrtCont(piPrtCont);
//创建凸台
CATISpecObject_var spSpecObj = spPrtFactOnPrtCont->CreatePad(spSketch);
CATIPad_var spPadOnSpecObj(spSpecObj);
//设置拉伸方向
2 S; K: Q: y# wspPadOnSpecObj->ModifyDirection(dirZ);
( t: p0 p2 ]/ G//设置凸台第一限制类型
! D8 P7 L8 M3 ]( r, MspPadOnSpecObj->ModifyEndType(catOffsetLimit);
6 o7 T9 M  @; A% D& v# h( J: I//设置凸台的高度
spPadOnSpecObj->ModifyEndOffset(firstLimit);
//设置凸台第二限制类型
spPadOnSpecObj->ModifyStartType(catOffsetLimit);
spPadOnSpecObj->ModifyStartOffset(secondLimit);
//将凸台添加在结构树中
spSpecObj->Update();
CATIGSMProceduralView_var ispProcView = spSpecObj;
0 n1 `/ F7 y5 o- y% Z! B" c2 }if (NULL_var != ispProcView ) {HResult rc = ispProcView ->InsertInProceduralView();}
6 V* P! P9 J# z