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

admin

获得零件指针
// 获得文件指针
* r0 c: h7 j! x- B) sCATDocument * pDoc= NULL;
6 {7 _  |* f! ?' NCATFrmEditor * _pEditor = CATFrmEditor::GeTCurrentEditor();
6 ]! `' ~: D- t1 F& F1 IpDoc = _pEditor->GetDocument();//这里得到了PART 环境下的文档指针
$ I& x, p( w7 E9 l6 ^7 w* gCATInit_var spInitOnDoc(pDoc);
- M5 G! Y  u# A( f* l5 ]" {/ ?1 e// 得到零件根容器
5 O6 y1 V; w1 X+ J/ m
CATIPrtContainer * piPrtCont =
  x" \/ z, I) f( r! F7 V2 l# s; F# W(CATIPrtContainer*) spInitOnDoc->GetRootContainer("CATIPrtContainer");
// 得到零件指针
CATIPrtPart_var spPart = piPrtCont->GetPart();
! p/ [7 v/ }* E8 O) }( s
) {. ?, p" v$ I$ u( {$ P7 l创建草图
//初始化草图工厂
CATISketchFactory_var spSketchFactory(piPrtCont);
//在XY plane 上创建草图
/ Q* ~  f( L9 u2 [. eCATISketch_var spSketch = spSketchFactory->CreateSketch(spRefPlanes[1]));
0 ~" a8 ^+ n4 \! \
创建草图几何
3 ]* i7 G6 g5 t, b2 M/ e1 n//首先声明编辑草图
spSketch->OpenEdition();
& A( G* X1 @# t# s, o* v1 {% gCATI2DWFFactory_var sp2DFactory(spSketch);
//这里表示圆心点
double iPoint[2] = {0.,0.};
//下面创建圆圈
, [, n6 F* o1 r2 Q; \CATISpecObject_var spLine = spSketch ->CreateCircle(iPoint,_Editor003->GetFloatValue());
CATI2DCurve_var spCurveOnLine(spLine);
spCurveOnLine->GetStartPoint();
spCurveOnLine->GetEndPoint();
//然后退出草图：
5 y+ n& y$ D$ U: m" H, e6 ~spSketch->CloseEdition();


  ~* K7 t) l6 b" l4 F创建约束
CATI2DConstraintFactory_var spConstraint2DFactory(spSketch);
//定义spLine1 的半径约束
spConstraint2DFactory->CreateConstraint(spLine, NULL, NULL, NULL, NULL, NULL,
# @' `4 Y  s+ Z1 W# QNULL, Cst2DType_Radius, 0, 0 );
//定义spLine1 与坐标原点的同心约束
  _6 V, h3 I  h6 h: K# _3 c  ~CATI2DAxis_var spSupport = NULL_var;
spSketch->GetAbsolute2DAxis(spSupport);

spConstraint2DFactory->CreateConstraint(spLine, NULL, spSupport->GetOriginPoint(),
NULL, NULL, NULL, NULL, Cst2DType_Concentric, 0, 0 );


$ `# ~& Z" O; q) f% u/ h) }0 X创建凸台
// 从编辑框中获得援助的高度
double firstLimit = _Editor004->GetFloatValue();
double secondLimit = 0.;
//圆柱的轴向方向为Z 轴方向
CATMathDirection dirZ(0., 0., 1.);
, s+ ]- I- y6 G//初始化零件工厂
CATIPrtFactory_var spPrtFactOnPrtCont(piPrtCont);
//创建凸台
CATISpecObject_var spSpecObj = spPrtFactOnPrtCont->CreatePad(spSketch);
CATIPad_var spPadOnSpecObj(spSpecObj);
//设置拉伸方向
spPadOnSpecObj->ModifyDirection(dirZ);
//设置凸台第一限制类型
7 t0 g# e  w+ a+ B/ o- rspPadOnSpecObj->ModifyEndType(catOffsetLimit);
//设置凸台的高度
! _3 d2 ~9 _* l. BspPadOnSpecObj->ModifyEndOffset(firstLimit);
//设置凸台第二限制类型
4 F( m# U0 V6 }8 h( K; h! o+ RspPadOnSpecObj->ModifyStartType(catOffsetLimit);
spPadOnSpecObj->ModifyStartOffset(secondLimit);
9 x& G8 E3 k9 Z! l//将凸台添加在结构树中
spSpecObj->Update();
CATIGSMProceduralView_var ispProcView = spSpecObj;
if (NULL_var != ispProcView ) {HResult rc = ispProcView ->InsertInProceduralView();}

$ z# i' a/ p1 W1 h3 q" I0 x4 y