---

Hallo CATIA-Freunde,
ich arbeite mich gerade mit dem Ziethen-Buch in die Makro-programmierung ein. Ich möchte Messungsparameter aus dem CATPart in meine Zeichnungdatei einsetzen. Dies habe ich mit einer Konstruktionstabelle geplant, die erst aus dem CATPart erstellt wird und anschließend in die CATDrawing eingelesen wird. Leider bricht mein Makro immer bei AddAssociation ab. Vielleicht kann mir hier jemand helfen!?

' Makro: Zeichnungsdaten.CATScript
' Version: 1.0
' Code: CATIA CATScript
' Zweck: Deklarieren eines aktiven Dokumentes
' Vorbereitung: Dokument laden oder erzeugen
' Autor: Jürgen Fillies

CATIA.StatusBar = "Zeichnungen, Version 1.0"

Sub CATMain ()

  Dim PartDoc As PartDocument
  Dim Vol, Leila As Parameter
  Dim Volumen, Leitkurvenlaenge As Double
  Set PartDoc = CATIA.ActiveDocument
MsgBox (PartDoc.Name)
  Set Vol = PartDoc.Part.Parameters.Item("Vol\Volumen")
MsgBox (Vol.Value & " cm³") 
  Set Volumen = PartDoc.Part.Parameters.Item("Vol\Volumen")
MsgBox ("Volumen des Elastomer: " & Volumen.Value & " cm³")
  Set Leila = PartDoc.Part.Parameters.Item("Leitkurve\Länge")
MsgBox (Leila.Value & " mm") 
  Set Laenge = PartDoc.Part.Parameters.Item("Leitkurve\Länge")
MsgBox ("Länge der Leitkurve: " &  Laenge.value & " mm")

' Konstruktionstabelle zuweisen -----------------------------------
Dim Rels As Relations
Set Rels = CATIA.ActiveDocument.Part.Relations
Dim KTab As DesignTable
Dim KName, Beschr, Pfad As CATBSTR
KName = "Tabelle Zeichnungsdatenl"
Beschr = "Daten für den Zeichnungskopf"
Pfad = "C:\Catiadaten\Zeichnungsdaten_27145.txt"
Set KTab = Rels.CreateDesignTable (KName, Beschr, false, Pfad)

' Parameter verknuepfen -------------------------------------------
KTab.AddAssociation Leila, "Laenge"
KTab.AddAssociation Vol, "Volumen"
KTab.AddAssociation Leila, "Laenge2"
KTab.Configuration = 1

MsgBox ("Ende des Makros")
 
End Sub

freundliche Grüße und
Danke im vorraus

von Jürgen Fillies

------------------
Jürgen Fillies
Federal Mogul Sealing Systems
07252588215

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

---

Hallo Jürgen,

auch ich habe das Problem, daß ich Informationen aus dem 3D ins 2D rüberbringen muß.
Allerdings kann ich dazu im Buch von Ziethen überhaupt nichts finden...Du scheinst da schon etwas weiter zu sein!
Kannst Du mir vielleicht Infos zu den Zusammenhängen zwischen 3D und 2D zukommen lassen??? Das wäre echt super und die unities wären Dir sicher!

Danke!
Spezi

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