---

Zwischenablage01.jpg

Hallo,

nun stehe ich vor meinem nächsten Problem.
Ich möchte unterhalb des Parametersets ein weiteres Set erzeugen in dem ein Parameter erzeugt wird (siehe Bild).
Gibt es einen Befehl für die Erzeugung eines Parametersets, like CreateParameterset oder ähnlich.  Oder bin ich da voll aufm Holzweg.

Gruß
Lars

Language="VBSCRIPT"

Sub CATMain()

Dim partDocument1 As Document
Set partDocument1 = CATIA.ActiveDocument

Dim part1 As Part
Set part1 = partDocument1.Part

Dim parameters1 As Parameters
Set parameters1 = part1.Parameters

Dim strParam1 As StrParam
Set strParam1 = parameters1.CreateString("`Zeichenfolge.1`", "")

part1.Update

End Sub

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

---

schau mal hier http://ww3.cad.de/foren/ubb/Forum137/HTML/000834.shtml#000002

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

---

Hallo Locke101,

hab ich das jetzt richtig verstanden, das es nicht möglich ist den Parameter unterhalb anzuordnen? Das es für die Parameter keine richtigen Pfade für die Programmierung gibt und es damit nicht nöglich ist das Vaterset zu definieren und diesem ein Kindset zuzuweisen?

Gruß
Lars

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

---

Schau mal hier

http://ww3.cad.de/foren/ubb/Forum137/HTML/001624.shtml

vielleicht hilft dir das weiter

[Diese Nachricht wurde von Augustiner am 29. Jun. 2007 editiert.]

[Diese Nachricht wurde von Augustiner am 29. Jun. 2007 editiert.]

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

---

Habs mal bis jetzt noch nicht hinbekommen, was nicht heißt das es keine Möglichkeit gibt, denn absolut damit vertieft habe ich mich auch noch nicht.

Vielleicht weiß sonst noch jemand was!

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

---

Hallo Andi und Locke101,

Andi vielen Dank für den Link. Genau das hab ich gesucht. Irgendwie hab ich beim Suchen wohl nicht richtig hingeschaut.
Ich hab die Codezeilen ein wenig geändert. Wie kann ich denn den zweiten Parameter umbenennen. Er soll nicht mehr Parameter.1 heißen sondern z.B. Variante. Ich muss doch nun eine Befehlszeile mit Rename einfügen. Und ist es relevant ob ich erst meine Parameter erzeuge und dann das Set umbenenne oder umgekehrt.
Oder ist es nun doch nicht möglich wie Michael Kirsch in dem ersten Link geschrieben hat?

Gruß
Lars

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

---

zeig mal deinen Code

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

---

Hi Andi,

Sub CATMain()

Set MyPart = CATIA.ActiveDocument.Part

Dim Params

Set Params = MyPart.Parameters

Params.CreateSetOfParameters MyPart

Params.CreateSetOfParameters Params.RootParameterSet

Dim Params1

Set Params1 = MyPart.Parameters.Sublist(Params.RootParameterSet.ParameterSets.Item(1),True)

Set strParam1 = Params1.createString ("OP","")

Set strParam1 = Params1.createString ("Fertigmaß Laenge","")

Set strParam1 = Params1.createString ("Fertigmaß Breite","")

Set strParam1 = Params1.createString ("Fertigmaß Hoehe","")

Mypart.Update

End Sub

Gruß
Lars

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