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

admin

获得零件指针
// 获得文件指针
CATDocument * pDoc= NULL;
CATFrmEditor * _pEditor = CATFrmEditor::GeTCurrentEditor();
  Z# @: @( x( U4 |pDoc = _pEditor->GetDocument();//这里得到了PART 环境下的文档指针
8 Q+ C5 ~& r5 C$ G. i3 ^+ a; ]CATInit_var spInitOnDoc(pDoc);
// 得到零件根容器
& k$ e5 Q& Q1 R" c
CATIPrtContainer * piPrtCont =
(CATIPrtContainer*) spInitOnDoc->GetRootContainer("CATIPrtContainer");
5 l, k# P5 o& C. b+ E$ c* U# l& O// 得到零件指针
) K2 z- D1 `" ?) u- K4 f8 Y1 OCATIPrtPart_var spPart = piPrtCont->GetPart();
& x4 M) b! y' A% z% b* ]- z2 ]$ [
创建草图
7 [/ p+ O. r8 j- b% B: f//初始化草图工厂
( S4 V; J, _( ^$ BCATISketchFactory_var spSketchFactory(piPrtCont);
- H+ P1 O: l0 |6 ]//在XY plane 上创建草图
CATISketch_var spSketch = spSketchFactory->CreateSketch(spRefPlanes[1]));

创建草图几何
//首先声明编辑草图
8 ~9 O6 a+ v5 ]* Q% jspSketch->OpenEdition();
( p8 L7 k* X5 p; lCATI2DWFFactory_var sp2DFactory(spSketch);
9 v8 Y6 M8 [& T$ i4 G6 e3 v: d//这里表示圆心点
' S7 r* a% L1 L+ F# @4 _; Gdouble iPoint[2] = {0.,0.};
; k5 a% o, L$ R# ^: Z& Z1 p4 F/ L//下面创建圆圈
CATISpecObject_var spLine = spSketch ->CreateCircle(iPoint,_Editor003->GetFloatValue());
CATI2DCurve_var spCurveOnLine(spLine);
+ p" }, h$ U9 _  y1 p  Y$ J& tspCurveOnLine->GetStartPoint();
spCurveOnLine->GetEndPoint();
. Z2 H4 ?- D1 k. s1 T2 L' N& r//然后退出草图：
spSketch->CloseEdition();


创建约束
+ H. O9 \; Q, ^( ^) n7 WCATI2DConstraintFactory_var spConstraint2DFactory(spSketch);
+ t$ e5 V3 T$ k7 |, _) y//定义spLine1 的半径约束
spConstraint2DFactory->CreateConstraint(spLine, NULL, NULL, NULL, NULL, NULL,
NULL, Cst2DType_Radius, 0, 0 );
//定义spLine1 与坐标原点的同心约束
: Q. }6 Y' m7 r9 q) |CATI2DAxis_var spSupport = NULL_var;
2 d% H% s4 G5 G( o9 yspSketch->GetAbsolute2DAxis(spSupport);

- @  H$ ^/ B( w2 u4 M" B$ q% j( `spConstraint2DFactory->CreateConstraint(spLine, NULL, spSupport->GetOriginPoint(),
NULL, NULL, NULL, NULL, Cst2DType_Concentric, 0, 0 );
' o3 u) n; x! I
3 q. Q% M6 a, r' t  [
创建凸台
5 M5 U, T% T2 r" _// 从编辑框中获得援助的高度
double firstLimit = _Editor004->GetFloatValue();
/ f9 V. ]0 x& t+ n9 F+ M& Fdouble secondLimit = 0.;
3 g; A1 ?; O7 N7 r3 Y: E//圆柱的轴向方向为Z 轴方向
$ [: D: _1 T# x/ p+ }) ACATMathDirection dirZ(0., 0., 1.);
//初始化零件工厂
: I) U8 m4 l* N( {% g) [CATIPrtFactory_var spPrtFactOnPrtCont(piPrtCont);
6 }9 {$ _% U) w( K; ?//创建凸台
, @% y! e* b( n0 r4 e9 yCATISpecObject_var spSpecObj = spPrtFactOnPrtCont->CreatePad(spSketch);
CATIPad_var spPadOnSpecObj(spSpecObj);
& {" Z$ A9 S  \6 k2 t* S//设置拉伸方向
spPadOnSpecObj->ModifyDirection(dirZ);
//设置凸台第一限制类型
spPadOnSpecObj->ModifyEndType(catOffsetLimit);
" m9 |- x5 Q/ _+ s//设置凸台的高度
! a$ ~) L3 p5 Z) C" hspPadOnSpecObj->ModifyEndOffset(firstLimit);
//设置凸台第二限制类型
! ~2 Q# l% a' I1 ]) A- e  lspPadOnSpecObj->ModifyStartType(catOffsetLimit);
1 X  [  T6 l2 G8 ?spPadOnSpecObj->ModifyStartOffset(secondLimit);
8 O0 R9 q; R& V4 e//将凸台添加在结构树中
0 u6 Q/ C- u" ]0 gspSpecObj->Update();
CATIGSMProceduralView_var ispProcView = spSpecObj;
if (NULL_var != ispProcView ) {HResult rc = ispProcView ->InsertInProceduralView();}
$ }$ A, c, ]9 i: F+ ~" I* N9 C