|
CATIA V5 Programmierung : Part bearbeiten im Produkt
zizorro am 10.09.2004 um 11:02 Uhr (0)
Hallo zusammen!Ich lade über ein Makro eine Baugruppe. In dieser Baugruppe möchte ich nun einen Parameter eines bestimmten Parts anfassen, bzw. verändern.Bisher sieht das so aus:Sub CATMain() ----------------------------------------- Öffnen der BaugruppeDim neuesprodukt As DocumentSet neuesprodukt = CATIA.Documents.NewFrom ("X:augruppe.CATProduct")Dim product1 As ProductSet product1 = neuesprodukt.Product ----------------------------------------- Bearbeiten des PartsDim neuespart As DocumentSet neuespart ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Part bearbeiten im Produkt
zizorro am 10.09.2004 um 14:03 Uhr (0)
Hallo zusammen!Habe die Lösung gefunden: Dim neuespart As PartSet neuespart = CATIA.ActiveDocument.Product.Products.Item(n)Das andere Problem, wie ich die NewFrom-Operation auch auf die im Produkt verbauten Parts übertrage, ist aber weiterhin aktuell.Vielleicht weiss da jemand mehr.Gruß, zizo
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Hide/Show
zizorro am 13.09.2004 um 14:29 Uhr (0)
Hallo zusammen, mal wieder eine sicherlich ganz einfache Frage zum Thema Makroprogrammierung. Ich komme mit der VisProperty nicht so richtig klar. Ziel ist in einem geöffneten Part den Body.2 auszublenden. Folgendes Skript habe ich dazu erzeugt: Sub CATMain() Dim MyPart As Part Set MyPart = CATIA.ActiveDocument.Part Dim selection1 As Selection set selection1 = MyPart.Bodies.Item( Body.2 ) Dim Eigenschaft As VisProperties Set Eigenschaft = selection1.VisProperties Eigenschaft.SetShow 1 MyPart.update End Sub ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Hide/Show
zizorro am 14.09.2004 um 13:50 Uhr (0)
Hallo Ronny! Sehr gut möglich, dass der Befehl komisch ist. Stecke wie gesagt noch in den Kinderschuhen hinsichtlich Makroprogrammierung. Habe das Problem jetzt so gelöst: Sub CATMain() Dim MyPart As Part Set MyPart = CATIA.ActiveDocument Dim selection1 As Selection set selection1 = MyPart.Selection selection1.Search .Body.Name = Body.2;Alle ) Set Eigenschaft = selection1.VisProperties Eigenschaft.SetShow 1 End Sub Keine Ahnung, ob das jetzt weniger komisch ist, aber es funzt ;-) Trotzdem vielen Dank fà ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektion und anschließendes Suchen in Selektion
zizorro am 17.09.2004 um 11:27 Uhr (0)
Hallo zusammen, ich w�rde gerne �ber ein Makro erreichen, dass ein User aufgefordert wird, einen HybridBody zu selektieren und in diesem HB dann alle Elemente, die einen bestimmten Suchstring im Namen haben, sucht. Bisher sieht mein Skript so aus: Sub CATMain() Dim MyPart As Document Set MyPart = CATIA.ActiveDocument Dim Was(0) Was(0) = HybridBody Dim UserSel As Selection Set UserSel = CATIA.ActiveDocument.Selection UserSel.Clear MsgBox ( Bitte selektieren Sie den HybridBody ) Dim SelBody As CATBST ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektion und anschließendes Suchen in Selektion
zizorro am 17.09.2004 um 13:36 Uhr (0)
Hallo Andreas, wenn ich das richtig versteh und die Suche sich hinter Dim CATIA As INFITF.Application Set CATIA = GetObject(, CATIA.Application ) verbirgt, dann funktionierts irgendwie nicht :-( Trotzdem danke, Gruß, zizo
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Teilweise umbenennen von Features
zizorro am 17.09.2004 um 15:00 Uhr (0)
Hallo! Im Anschluß an meinen letzten Thread habe ich doch gleich noch einmal eine Frage: Die gesucht und gefundenenen Features haben alle Namen nach folgendem Schema: Bsp: Plane.23_fuer_Skizze Line.2_fuer_Skizze Point.6_fuer_Skizze Jetzt möchte ich, dass der vordere Teil des Namens (Plane.23_) bestehen bleibt, und alles was dahinter kommt (fuer_Skizze) ersetzt wird, durch einen im Skript definierten String. Also z.B. Plane.23_ohne Referenz Line.2_ohne Referenz Point.6_ohne Referenz ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Teilweise umbenennen von Features
zizorro am 20.09.2004 um 16:03 Uhr (0)
Hallo, habe mich leider zu früh gefreut. Der Replace-Befehl funktioniert bei mir nur bei Einzelteilen, nicht für eine Selection. Das Problem ist also immer noch aktuell. Des weiteren noch was anderes: Ich selektiere einen HybridBody. Diese Auswahl wird in einer Selection gespeichert ( UserSel ). Anschließend suche ich innerhalb dieser Selektion alle Elemente mit einem bestimmten String im Namen und speicher diese in einer weiteren Selection ( Liste ). Versuche ich dann über For i = 1 To CATIA.ActiveDocumen ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : warum kann ich PartNumber nicht in einen Paramter schreibe?
zizorro am 10.11.2004 um 17:28 Uhr (0)
Hallo, mal wieder eine doofe Frage. Habe folgendes Skript: ------------------------------------------------- Sub CATMain() Dim GeladenesProdukt As ProductDocument Set GeladenesProdukt = CATIA.ActiveDocument ---------Hier tuts nicht Dim Name As String Set Name = GeladenesProdukt.Product.PartNumber ----------- hier tuts wieder Dim Box As Real Box = MsgBox (GeladenesProdukt.Product.PartNumber, 64, Ausgabe des Partnames ) End Sub --------------------------------------------------------- Leider funktioniert ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektion einer Fläche und anschließendes Extract
zizorro am 07.10.2004 um 16:05 Uhr (0)
Hallo zusammen!Mal wieder eine sicher sehr einfach zu lösende Frage:Ich möchte in einem vorhandenen Modell eine Fläche selektieren und diese dann ableiten.Die Auswahl krieg ich hin mit:--------------------------------Dim Was(0)Was(0) = "Shape"Dim UserSel As SelectionSet UserSel = CATIA.ActiveDocument.selectionUserSel.ClearDim Auswahl As CATBStrAuswahl = UserSel.SelectElement(Was, "Innenfläche wählen!", False)-----------------------------------------------------Dann kommt die Extraktion bei mir mit:-------- ...
|
In das Form CATIA V5 Programmierung wechseln |