---

Hy @ all!

Habe eine Problem. Benutze seit 2 Tagen das Microsoft Visual Studio 2005 Standard Edition. Dort habe ich mir ein Programm geschrieben der gewisse Dateien in den Ordner des momentan geöffneten Product(Speicherpfad) kopiert. Das funkt ohne Probleme. Nun will ich aber das Product (das ich kopiert habe) in den Strukutrbaum von CATIA anhängen. Händisch mein ich das mit "Vorhande Komonenten". Jedoch erkennt MVS2005 nicht die Typen von CATIA. Geht das überhaupt und wenn ja wie? Bitte recht einfach erklären, da ich mit in MVS2005 noch nicht sehr gut auskenne!

Hier ein Codeteil:

'Einbindung in Baum---------------------------------------------------------

If (ok = True) Then
  Dim CATIA As Object
  Dim pfad As String, name As String
  Dim fehler As Boolean

  CATIA = GetObject(, "CATIA.Application")
  pfad = CATIA.ActiveDocument.FullName
  name = CATIA.ActiveDocument.Name
  pfad = Replace(pfad, name, "")

  Dim productDocument1 As ProductDocument
  productDocument1 = CATIA.ActiveDocument

  Dim product1 As Product
  product1 = productDocument1.Product

  Dim products1 As Products
  products1 = product1.Products

  Dim arrayOfVariantOfBSTR1(0)
  arrayOfVariantOfBSTR1(0) = xyz  'Der Pfad ist vom vorherigen Teil bekannt
  products1Variant = products1
       
  products1Variant.AddComponentsFromFiles(arrayOfVariantOfBSTR1, "All")

End If

Aja, noch was. Kann man das irgendwie einstellen, das man die Befehle von CATIA in der Vorschau bekommt, also wenn ich CATIA. schreibe und dann ein Menü mit Active Document und so aufklappt?

DANKE

MfG
Tonka

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo

schau mal hier

klick
und hier

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi Tonka,

deine 2. frage kann ich beantworten:

damit du die Eingenschaften, Befehle des Objekte sehen kannst musst du die Verweisse hinzufügen. dazu kommt das du das objekt richtig deklariern musst. aber achtung es kann zu sehr schönen fehler kommen, da dassault das vb.net noch nicht / nie richtig unterschtütz hat.

Code:

---

Public CATIA As INFITF.Application

---

zum anderen... ich mache fast das selbe. ich bin an einem template tool entwicklen in dem ich auch die möglichkeit haben muss ein part einem produkt zuzuweisen... nun mit vb6 geht das... mit vb.net momentan noch nicht... ich weiss noch nicht wieso, habs auch erst seit gestern bemerkt 

hier noch der code damit du vielleicht vergleichen kannst

Code:

---

Dim myProduct 'As INFITF.AnyObject

xSel = CATIA.ActiveDocument.Selection

SelectProduct(0) = "Product"

Do
status = xSel.SelectElement2(SelectProduct, "Select a product", True)
xSel = CATIA.ActiveDocument.Selection

If status = "cancel" Then Exit Sub
Loop Until status IsNot Nothing

Try
myProduct = xSel.FindObject("CATIAProduct")

Catch ex As Exception
frmMain.lblInformations.Text = "No product selected!"

End Try

myProduct.Products.AddComponentsFromFiles(CATIAFileTemplatePath, "All")

---

bei der letzen zeile bekomme ich immer ein com handling fehler... egal was ich mache und wie ich das objekt deklarieren oder eben nicht...

viel glück
gruss, mathias

------------------
In diesem Zeitalter der Massenkomunikation sind Verrücktheiten ansteckend.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Also bei mir funktioniert folgender Code in .net

Code:

---

    Dim oRootDoc As ProductDocument = CATIA.Documents.add("Product")
        Dim oRootProd As Products = oRootDoc.Product.Products
        Dim File(0)
        File(0) = "C:\Part.CATPart"
        oRootProd.AddComponentsFromFiles(File, "CATPart")

---

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP