CATIA二次开发入门教程---19 创建一条线

admin

CATIA二次开发入门教程---19 创建一条线

( f9 t0 A8 I  \[mw_shl_code=c,true]
        CATFrmEditor *pEditor = CATFrmEditor::GeTCurrentEditor();
        CATDocument *pDoc = pEditor->GetDocument();
        CATIContainerOfDocument_var spConOfDoc = pDoc;
        if (spConOfDoc == NULL_var)
6 C  q3 s) u  k0 t9 y        {
                popUpNotifyDialog("No spConainer of document");
$ C& S( M! t- @  a+ w, g, X        }
8 O/ O+ ^# Y- Y        CATIContainer *pCon = NULL;
        HRESULT hr = spConOfDoc->GetSpecContainer(pCon);
% K1 a: A  s6 v9 ?# f4 K5 w
6 j# I: r  h& |; ~! i3 @% w1 G        //get GSM factory

    CATMathPoint p1,p2;
9 W4 r0 x3 m/ n; h5 u+ Q: W        p1.SetCoord(0,0,0);
        p2.SetCoord(10,10,10);
       

     CATIGSMFactory_var spGSMFactory = pCon;
  
         CATIGSMPoint_var  spP1 = spGSMFactory->CreatePoint(p1,"");
         CATIGSMPoint_var  spP2 = spGSMFactory->CreatePoint(p2,"");
9 q7 I( D+ A: P     
) d1 O/ `# q  l$ R  CATIGSMLinePtPt_var spLine =  spGSMFactory->CreateLine(spP1,spP2,NULL_var);

% C2 u. |7 L2 z9 p: G: E% H' z8 Q, o  CATISpecObject_var spSpecObject = spLine;
( o' C- C9 f" J; z  CATIGSMProceduralView_var spGSMProceduralView = spSpecObject;
' O' h! ?: n' @, q' X2 M: J1 T9 y
/ D5 g" E; H  J, }) W0 G' V  spGSMProceduralView->InsertInProceduralView();
- w! C* Z( C2 Q: l/ r. b5 A
  spSpecObject->Update();[/mw_shl_code]

admin

在此基础上，创建线的步骤如下：

1)创建两个点并将其转换为CATISpecObjects。

double Coords[3];

Coords[0] = 0;

Coords[1] = 0;

Coords[2] = 0;

CATIGSMPoint_var spPoint1 = spGSMFactory->CreatePoint(Coords); CATISpecObject_var spSpecPoint1 = spPoint1;                  

Coords[0] = 8;

Coords[1] = 6;

Coords[2] = 7;

CATIGSMPoint_var spPoint2 = spGSMFactory->CreatePoint(Coords);

CATISpecObject_var spSpecPoint2 = spPoint2;

2) 利用创建的点创建一条线，并将其转换为CATISpecObject

CATISpecObject_var  spSupport = NULL_var;

CATIGSMLinePtPt_var spLine1 = spGSMFactory->CreateLine(spSpecPoint1, spSpecPoint2, spSupport);

CATISpecObject_var spSpecLine1 = spLine1;

3) 更新创建的线，并将其添加到视图中。

spSpecLine1->Update();

CATIGSMProceduralView_var spCurObj = spLine1;

spCurObj->InsertInProceduralView();