VB.Net實現下CATIA二次開發方法

來源:互聯網
上載者:User

標籤:doc   開發   出錯   ref   ror   視窗   ica   vb.net   targe   

源自網路。 

   在visual studio(vb,c#,c++)下使用CATIA進行二次開發有如下特點:
-->需要引用CATIA的物件程式庫
-->需要對象聲明(visual studio文法要求)。在聲明對象時,應指明物件類型為CATIA的某種對象,否則可能執行出錯。
下面對以上兩點過程詳細說明。
1.引用CATIA類型庫
    1)建立項目,按下按鍵組合(ALT+F7)或點擊“項目-->屬性”

   2)為項目添加引用:在屬性視窗中點擊“引用",然後點”添加...“
.  

2011-5-19 15:57 上傳

下載附件 (105.6 KB) 


   3)在”添加引用“對話方塊中選擇”CATIA V5 GSMInterfaces Object Library“,"CATIA V5 MecModInterfaces Object Library","CATIA V5 PartInterfaces Object Library","CATIA V5 ProductStructureInterfaces Object Library"
      注意:上述引用能包含零件設計、GSD模組、裝配設計等基本模組,如需其他模組中操作,可能需要添加更多個物件庫. 如:

 

2。在代碼中匯入物件程式庫(以vb為例)。
1)在代碼的最前面加入Imports語句:
   Imports ProductStructureTypeLib
   Imports MECMOD
   Imports PARTITF
   Imports HybridShapeTypeLib

  2)定義CATIA對象
        On Error Resume Next
        Dim CATIA As INFITF.Application
        CATIA = GetObject(, "CATIA.Application")
        If Err.Number <> 0 Then
            CATIA = CreateObject("CATIA.Application")
            CATIA.Visible = True
        End If
  3)定義對象時要用CATIA物件類型:
      比如:
        Dim opartDocument As PartDocument = CATIA.ActiveDocument
        Dim oPart As Part = opartDocument.Part
        Dim ohybridShapeFactory As HybridShapeFactory = oPart.HybridShapeFactory
        Dim hybridShapeLoft1 As HybridShapeLoft = ohybridShapeFactory.AddNewLoft()

VB.Net實現下CATIA二次開發方法

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.