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

admin

CATIA二次开发入门教程---19 创建一条线
6 |4 V& O* j$ J
[mw_shl_code=c,true]
        CATFrmEditor *pEditor = CATFrmEditor::GeTCurrentEditor();
! t! M+ \6 a5 R# s        CATDocument *pDoc = pEditor->GetDocument();
/ V$ D- C3 B. Z7 I3 e& Y' R& e        CATIContainerOfDocument_var spConOfDoc = pDoc;
        if (spConOfDoc == NULL_var)
        {
! X2 D& b6 H, M4 Z: s                popUpNotifyDialog("No spConainer of document");
0 X( S5 E2 _- [6 }        }
; l* t7 B4 ~6 e5 X& n        CATIContainer *pCon = NULL;
        HRESULT hr = spConOfDoc->GetSpecContainer(pCon);

# b( D  V, `8 V( k        //get GSM factory

/ c  f. \# \# t" U    CATMathPoint p1,p2;
        p1.SetCoord(0,0,0);
        p2.SetCoord(10,10,10);
       
: L6 \7 Y1 _& @
2 i& @, J% Y2 b- L     CATIGSMFactory_var spGSMFactory = pCon;
  
5 h- c) H3 v6 D. A" r" H2 m         CATIGSMPoint_var  spP1 = spGSMFactory->CreatePoint(p1,"");
1 Y; L' z' D0 h+ z' v) K# b7 ]         CATIGSMPoint_var  spP2 = spGSMFactory->CreatePoint(p2,"");
. }& ]' B9 d; y- A; l     
  CATIGSMLinePtPt_var spLine =  spGSMFactory->CreateLine(spP1,spP2,NULL_var);
) e4 e3 q! {, U% O7 [$ v/ d
  CATISpecObject_var spSpecObject = spLine;
  CATIGSMProceduralView_var spGSMProceduralView = spSpecObject;

0 u, F/ P- L) [: Q" t/ a  spGSMProceduralView->InsertInProceduralView();

; d4 j. D0 \# K  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();

$ i: _9 t+ s  n' `7 T  z6 x