Catia二次开发源码分享：创建参数和公式

admin

创建参数和公式
1．创建参数
//初始化CATICkeParmFactory 工厂
CATICkeParmFactory_var spParmFactory = spContainer;
# w  P, w$ v& C: n% e+ XCATICkeParm_var spParam1 = spParmFactory->CreateLength("Base",0.1);
3 ~4 M4 l! F! F# cCATICkeParm_var spParam2 = spParmFactory->CreateLength("Width",0.15);//长度单位为米
* C6 a& B1 a% `- PCATICkeParm_var spParam3 = spParmFactory->CreateLength("Height",0.2);//创建长度参数
7 l# B1 }) T9 b# }. B- K// CATIParmPublisher 与CATICkeFunctionFactory 功能为将所有参数显示在结构树中
6 [$ C" T# c* f: u7 `- G- lCATIParmPublisher_var spParmPublisher = NULL_var;
CATICkeFunctionFactory_var spFuncFactory =CATCkeGlobalFunctions::GetFunctionFactory();
1 l& ^4 E! h/ f4 j$ }  P6 vspParmPublisher=
spFuncFactory->GetCurrentSet(CATICkeFunctionFactory:arameter,spPrtPart,CATCke::True);
, L4 c+ [! g/ q; X) m# ?9 h3 @spParmPublisher.Append(spParam1);
spParmPublisher.Append(spParam2);
spParmPublisher.Append(spParam3);
4 Y( f% y) x$ L7 P, f3 W2．创建公式
# z" V! W' |$ M% n8 |2 K' O# O//创建参数列表
CATCkeListOfParm pList;
pList->Append (spParam1);
pList->Append (spParam2);
pList->Append (spParam3);
% r9 M' G9 s: v) N$ h6 a//创建公式Height = Width + Base
: T& A1 B4 M5 L  R1 M3 l6 ACATICkeRelation_var spFormula1 = spParmFactory->CreateFormula("Formula","","",
spParam3, pList, "Width+Base", spParmPublisher, CATCke::True);
3 f, o" S* A# m6 H3 Q- R" A( \: }spFuncFactory->AddToCurrentRelationSet(spFormula1, spParmPublisher);
//修改参数进行测试
spParam1->Valuate(0.5);