|
CATIA V5 Programmierung : Open Material Dialog
bgrittmann am 22.08.2017 um 12:35 Uhr (1)
ServusSchon mal probiert über ein StartCommand den Dialog zu öffnen (Vorsicht StartCommands sind sprachabhängig). zBCode:Sub CATMain()Catia.StartCommand "Material zuordnen"End SubOder eben einen eigenen Dialog in VBA bzw VB erzeugen.GrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Open Material Dialog
C.Samer am 22.08.2017 um 13:33 Uhr (1)
Hallo Bernd,danke für deinen Beitrag!Code: CATIA.StartCommand "Material zuordnen" MsgBox "hi"StartCommand funktioniert, unterbricht nur leider nicht den Code und hat auch keine Return Value."Hi" wird sogar vor dem Material Dialog angezeigt.Liebe Grüße,Christoph
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Längere Edge einer Intersection messen
student1992 am 23.08.2017 um 16:28 Uhr (1)
Code:Sub CATMain()Dim partDocument1 As DocumentDim osel As SelectionDim TheSPAWorkbench As WorkbenchDim TheMeasurable As MeasurableSet partDocument1 = CATIA.ActiveDocumentSet osel = partDocument1.Selectionif osel.count = 0 then exit subend ifosel.Search "Topology.CGMEdge,sel"Set TheSPAWorkbench = CATIA.ActiveDocument.GetWorkbench ( "SPAWorkbench" ) if osel.count o then for i = 1 to osel.count Set TheMeasurable = TheSPAWorkbench.GetMeasurable(osel.item2(i).reference) MsgBox "Element " & i & ", Länge: ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Längere Edge einer Intersection messen
bgrittmann am 23.08.2017 um 15:13 Uhr (1)
ServusAlso ich würde die Intersection selektieren und innerhalb dieser in der Topologie nach Kanten suchen. zB:Code:Sub CATMain()Dim partDocument1 As DocumentDim osel As SelectionDim TheSPAWorkbench As WorkbenchDim TheMeasurable As MeasurableSet partDocument1 = CATIA.ActiveDocumentSet osel = partDocument1.Selectionif osel.count = 0 then exit subend ifosel.Search "Topology.CGMEdge,sel"Set TheSPAWorkbench = CATIA.ActiveDocument.GetWorkbench ( "SPAWorkbench" ) if osel.count o then for i = 1 to osel.count ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catcolor in vba
EmilioSanchez am 17.08.2019 um 22:04 Uhr (1)
Hallo Bernd,erst mal vielen Dank für die Blitzschnelle Antwort.Ich habe deinen Codevorschlag getestet, funktioniert aber nur bei der Farbe Rot.Sieht mit anderen Werten wie folgt aus: RGB Soll ISTRot 255,0,0,255 / -16776961 / -16776961Blau 0,0,255,255 / 65535 / -65536Grün 0,255,0,255 / 16711935 / -16711936Hellgrün 192,255,192,255 / -1056980737 / -4128832Leider spuckt das WWW hierzu auch nicht viel aus.Habe nur folgende Codezeile in Ja ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Index einer Tabelle in Drawing herausfinden
Diesaster am 25.08.2017 um 07:42 Uhr (1)
Hallo Community,habe eine weitere Frage in Catia VBA-Programmierung.In der Automation.chm steht für die Tabellendefinition folgender Code:Code:Func Item( long iIndex) As DrawingTable Returns a drawing table using its index from the DrawingTables collection. Parameters: iIndex The index of the drawing table to retrieve from the collection of drawing tables. As a numerics, this index is the rank of the drawing table in the collection. The index of the first drawing table in the collection is 1, and the index ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catcolor in vba
EmilioSanchez am 17.08.2019 um 11:02 Uhr (1)
Hallo,stehe vor dem gleichen Problem wie von Diesaster beschrieben.Für viele Farbzuweisungen verwendet Catia ja RGB, bestehend aus drei Kanälen, für die Farbe Rot wäre das RGB(255,0,0).Diese drei Werte lassen sich über den Farbdialog ermitteln und zuweisen.Anders z.B. bei den DrawingTextProperties die Eigenschaft .Color.Hier erwartet Catia einen Long Integer Wert kodiert aus RGBA, bestehend aus vier Kanälen, wobei der vierte die Transparenz angibt (0=Transparent / 255=Undurchsichtig so folgere ich zumindes ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Index einer Tabelle in Drawing herausfinden
Diesaster am 25.08.2017 um 11:57 Uhr (1)
Das mit dem Namen abgreifen funktioniert nur bei Sheets und Views, deswegen steht in der Automation.chm ja folgender Satz drin.Code:The index of the drawing table to retrieve from the collection of drawing tables. As a numerics, this index is the rank of the drawing table in the collection. The index of the first drawing table in the collection is 1, and the index of the last drawing table is Count. Das heißt man kann nur den Index der Tabelle verwenden. Irgendwo muss ich doch diesen Index herauslesen könn ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Index einer Tabelle in Drawing herausfinden
Diesaster am 25.08.2017 um 13:10 Uhr (1)
Ich kann den Namen der Tabelle schon auslesen, nur was nützt es mir? Erklär mir das bitte.Wenn ich nicht alle Tabellen in der View bearbeiten möchte sondern nur eine bestimmte?Über Catia.ActiveDocument.Selection kann ich eine Tabelle auswählen, aber wie bekomme ich den Index der dahinter steckt?
|
| In das Form CATIA V5 Programmierung wechseln |
 |
CATIA V5 Programmierung : Constraint mit Formel
bgrittmann am 25.08.2017 um 16:41 Uhr (15)
ServusKlar geht dass. Lässt sich auch zu großen Teilen mit dem Makrorekorder aufzeichnen.Hier ein kleines Beispiel (die Erzeugung der Referenzen und die Struktur des Codes ist grauenhaft )Code:Sub CATMain()Dim productDocument1 As DocumentSet productDocument1 = CATIA.ActiveDocumentDim product1 As ProductSet product1 = productDocument1.ProductSet product1 = product1.ReferenceProductDim constraints1 As CollectionSet constraints1 = product1.Connections("CATIAConstraints")Dim reference1 As ReferenceSet referen ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Mehrfacbearbeitung von Produkt/Part verhindern
moppesle am 28.08.2017 um 10:27 Uhr (15)
Hallo zusammen,es wird in meinem Makro Rekursiv eine Produktstruktur abgearbeitet.Nun möchte ich eine Mehrfachbearbeitung von Gleichteilen verhindern.Habe mir das in etwas so vorgestellt.-Produkt/Partname in ein Array schreiben.-Vor Aufruf der Funktion zur Bearbeitung der Produkte/Parts den Namen das aktuellen Produkt/Part vergleichen.-Wenn Name schon vorhanden Bearbeitung überspringen.Hat vielleicht jemand ein Beispiel für mich.Danke euch. ------------------Gruß UweAuch Catia ist nur ein Mensch!
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Mehrfacbearbeitung von Produkt/Part verhindern
moppesle am 29.08.2017 um 08:29 Uhr (15)
Hallo euch beiden,Danke für die InfoIch Schaue mir das mal an.Bestimmt werde ich mich auch nochmal melden. ------------------Gruß UweAuch Catia ist nur ein Mensch!
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro für Define in Work
Beinschuss am 04.09.2017 um 13:26 Uhr (1)
Guten Tag...Ich bin ein blutiger Anfänger in Sachen Makros und hoffe, dass ihr mir ein wenig bei meinem Verständniss weiter helfen könnt. Ich habe viele Seiten hier im Forum durch gestöbert, leider bin ich aber trotzdem nicht zu einer Lösung für mein Problem gekommen. In diesem Fall geht es darum, dass ich sehr häufig verschiedene Geometrische Sets "aktiv" (Define in Work) setzen muss und mir dafür einen Tastenkürzel anlegen wollte. Bei den "Commands" lässt sich aber für "Define in Work Object" kein Tastat ...
|
| In das Form CATIA V5 Programmierung wechseln |
