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

admin

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

[mw_shl_code=c,true]
  _3 ^8 U; k* g0 g7 H4 r        CATFrmEditor *pEditor = CATFrmEditor::GeTCurrentEditor();
% W2 p6 @* X: T1 H0 @8 W( Q        CATDocument *pDoc = pEditor->GetDocument();
        CATIContainerOfDocument_var spConOfDoc = pDoc;
        if (spConOfDoc == NULL_var)
" i5 n; x6 T8 }/ N) y- F        {
                popUpNotifyDialog("No spConainer of document");
        }
        CATIContainer *pCon = NULL;
        HRESULT hr = spConOfDoc->GetSpecContainer(pCon);
8 ?4 @, d) P4 k4 C3 m" V
        //get GSM factory
* u& N$ Y, ]& [& t5 P
+ p; o+ @" Y" q+ B9 g% Q9 h    CATMathPoint p1,p2;
1 S; d+ M9 L0 u        p1.SetCoord(0,0,0);
( d4 W6 a$ S! ^- W        p2.SetCoord(10,10,10);
; w: d6 ]& O2 R% `. {( B+ ~       
6 K- f7 q; d% D- W, ^0 b! Q
     CATIGSMFactory_var spGSMFactory = pCon;
2 k, ^( W# ^0 b4 n% L/ U! \  
         CATIGSMPoint_var  spP1 = spGSMFactory->CreatePoint(p1,"");
         CATIGSMPoint_var  spP2 = spGSMFactory->CreatePoint(p2,"");
/ d9 S1 _3 O- u% {& ^     
  CATIGSMLinePtPt_var spLine =  spGSMFactory->CreateLine(spP1,spP2,NULL_var);
7 O! s9 K% l  q! j+ h8 r5 v2 q6 G! M# H" z
4 [7 i1 l  J7 _: m5 R2 h  CATISpecObject_var spSpecObject = spLine;
  CATIGSMProceduralView_var spGSMProceduralView = spSpecObject;

  spGSMProceduralView->InsertInProceduralView();

  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();