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

admin

获得零件指针
// 获得文件指针
CATDocument * pDoc= NULL;
/ g" h* V# P( [% |9 u8 F$ XCATFrmEditor * _pEditor = CATFrmEditor::GeTCurrentEditor();
pDoc = _pEditor->GetDocument();//这里得到了PART 环境下的文档指针
- v* V1 k( g' X  u- n- eCATInit_var spInitOnDoc(pDoc);
// 得到零件根容器
5 v! n1 i3 D7 D3 E
CATIPrtContainer * piPrtCont =
(CATIPrtContainer*) spInitOnDoc->GetRootContainer("CATIPrtContainer");
2 t+ F/ |" e: M3 P4 S// 得到零件指针
CATIPrtPart_var spPart = piPrtCont->GetPart();

创建草图
, }8 `  k9 ~$ K& J7 h/ e( Y7 Q7 Y9 g//初始化草图工厂
CATISketchFactory_var spSketchFactory(piPrtCont);
/ T, T  z6 O, ^8 _- t//在XY plane 上创建草图
CATISketch_var spSketch = spSketchFactory->CreateSketch(spRefPlanes[1]));
* \- v' S4 s9 p; V% i/ ^
创建草图几何
//首先声明编辑草图
5 ^2 l+ E/ B3 aspSketch->OpenEdition();
CATI2DWFFactory_var sp2DFactory(spSketch);
//这里表示圆心点
7 Q; f$ A  u/ Ldouble iPoint[2] = {0.,0.};
//下面创建圆圈
CATISpecObject_var spLine = spSketch ->CreateCircle(iPoint,_Editor003->GetFloatValue());
; c0 M0 D; F# x" Z- \/ n# J  SCATI2DCurve_var spCurveOnLine(spLine);
$ o' Q1 P( j3 V, U0 |spCurveOnLine->GetStartPoint();
/ G. {. X" M$ u" M" A3 E9 F1 @$ hspCurveOnLine->GetEndPoint();
//然后退出草图：
; V$ }+ Z- _4 J& u, J0 f  w+ bspSketch->CloseEdition();

- B9 X# C+ ~. V* X3 n1 [) M
创建约束
CATI2DConstraintFactory_var spConstraint2DFactory(spSketch);
//定义spLine1 的半径约束
spConstraint2DFactory->CreateConstraint(spLine, NULL, NULL, NULL, NULL, NULL,
; Z7 j6 l( n. D$ T6 A8 s; j* g+ iNULL, Cst2DType_Radius, 0, 0 );
8 s( ~" x. c: r8 j6 f//定义spLine1 与坐标原点的同心约束
CATI2DAxis_var spSupport = NULL_var;
  b" M& A$ I" j+ i/ P+ U$ pspSketch->GetAbsolute2DAxis(spSupport);

1 r4 }8 e" }0 c1 R4 m/ s$ T& ]spConstraint2DFactory->CreateConstraint(spLine, NULL, spSupport->GetOriginPoint(),
NULL, NULL, NULL, NULL, Cst2DType_Concentric, 0, 0 );


  T9 L9 m% B0 I4 ?创建凸台
$ N7 h. }% J! [' m, v* H- W5 d// 从编辑框中获得援助的高度
double firstLimit = _Editor004->GetFloatValue();
double secondLimit = 0.;
//圆柱的轴向方向为Z 轴方向
CATMathDirection dirZ(0., 0., 1.);
5 D& F( |. x9 h& _0 K! @% Z4 {//初始化零件工厂
/ I9 ^/ {1 R' T7 YCATIPrtFactory_var spPrtFactOnPrtCont(piPrtCont);
( _) D2 l% `% b. D, ^0 @//创建凸台
CATISpecObject_var spSpecObj = spPrtFactOnPrtCont->CreatePad(spSketch);
CATIPad_var spPadOnSpecObj(spSpecObj);
/ b" ?  p9 f+ L$ w3 K- Y//设置拉伸方向
' i5 L6 p6 i# M. U- N  Y, L" o- DspPadOnSpecObj->ModifyDirection(dirZ);
7 D" x+ P' s4 v. q) r$ \5 I//设置凸台第一限制类型
spPadOnSpecObj->ModifyEndType(catOffsetLimit);
( O! ^$ g6 G! C  l& x9 P//设置凸台的高度
spPadOnSpecObj->ModifyEndOffset(firstLimit);
, q, ~: K& I0 {! x7 r" v! ^) ^( H//设置凸台第二限制类型
9 ]8 [1 z/ S. X' E1 c: E6 fspPadOnSpecObj->ModifyStartType(catOffsetLimit);
# ^! N: |" I5 {! Y9 |spPadOnSpecObj->ModifyStartOffset(secondLimit);
+ F& s1 r9 g  [3 S//将凸台添加在结构树中
7 ~* o4 k- B& v3 W0 U& TspSpecObj->Update();
8 ^: l0 v$ k9 TCATIGSMProceduralView_var ispProcView = spSpecObj;
( ]- r7 w/ A9 B8 N8 Z- |1 zif (NULL_var != ispProcView ) {HResult rc = ispProcView ->InsertInProceduralView();}

9 a7 m1 D& b1 u1 p8 D) i4 A