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

admin

创建参数和公式
1．创建参数
/ l. s& k  ]7 n% Q//初始化CATICkeParmFactory 工厂
CATICkeParmFactory_var spParmFactory = spContainer;
CATICkeParm_var spParam1 = spParmFactory->CreateLength("Base",0.1);
CATICkeParm_var spParam2 = spParmFactory->CreateLength("Width",0.15);//长度单位为米
) y, \: G  \7 p$ E. M8 H; ?CATICkeParm_var spParam3 = spParmFactory->CreateLength("Height",0.2);//创建长度参数
// CATIParmPublisher 与CATICkeFunctionFactory 功能为将所有参数显示在结构树中
# L  k. a9 f1 `8 WCATIParmPublisher_var spParmPublisher = NULL_var;
+ ^9 ?6 k% ?( Y* F7 |CATICkeFunctionFactory_var spFuncFactory =CATCkeGlobalFunctions::GetFunctionFactory();
spParmPublisher=
spFuncFactory->GetCurrentSet(CATICkeFunctionFactory:arameter,spPrtPart,CATCke::True);
6 |" r0 ~) m/ @$ nspParmPublisher.Append(spParam1);
spParmPublisher.Append(spParam2);
- M0 X" q( w, |spParmPublisher.Append(spParam3);
# q4 p% U# h9 H) g+ p/ \  E7 O2．创建公式
//创建参数列表
CATCkeListOfParm pList;
pList->Append (spParam1);
pList->Append (spParam2);
pList->Append (spParam3);
//创建公式Height = Width + Base
CATICkeRelation_var spFormula1 = spParmFactory->CreateFormula("Formula","","",
spParam3, pList, "Width+Base", spParmPublisher, CATCke::True);
' Y5 {4 Q6 x; }1 fspFuncFactory->AddToCurrentRelationSet(spFormula1, spParmPublisher);
+ s* Z7 L% l8 R' p//修改参数进行测试
1 i7 J: j* _# L  S6 YspParam1->Valuate(0.5);

. R- B* S" V" m! S