|
CATIA V5 Programmierung : Line & Point Selection
tr am 15.05.2003 um 13:17 Uhr (0)
Hallo, ich möchte eine Linie (Edge,Axis..) und einen Punkt in einem V5 Fenster selektieren. Dafür habe ich 2 Subroutinen erstellt. Die Erste ermöglicht die Selektion eines Punktes: Sub pt_selection_ref Dim sFilter(0) sFilter(0) = "Product" sstatus = CATIA.ActiveDocument.Selection.selectelement(sFilter,"Point selektieren",False) pt_sprod_name = CATIA.ActiveDocument.Selection.item(1).reference.displayname Status=EndSelectElement CATIA.ActiveDocument.Selection.clear sFilter(0) = "Point" sstatus = CA ...
| | In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Copy/Paste with link einen Body der in einem instancierter Product ist.
tr am 28.05.2003 um 10:56 Uhr (0)
Hi, I try to copy a Body of an instanciate Part into an other Part but if I work with objects, Catia returns always the body of the first instance. That’s my first script but it doesn’t work (In a first time I tried to copy the complete instanciate Part before trying to copy a Body...) Sub test() Set root = CATIA.ActiveDocument.Product.Products Set subprod = root.Item("Sub-Product_in_root").Products Set subprod2 = subprod.Item("Product_in_Sub-Product").Products Set subprod3 = subprod2.Item("Product_contain ...
| | In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : AnnotationSets in Part/Product
tr am 19.09.2003 um 13:54 Uhr (0)
Hallo, ich habe folgendes Skript zur Erstellung eines neuen Annotaion Sets im zuvor selektierten Part: Set mysel = CATIA.ActiveDocument.Selection ReDim InputObjectType(0) InputObjectType(0) = Part CATIA.ActiveDocument.Selection.Clear Status = mysel.SelectElement(InputObjectType, Part wählen! , False) Set opart = CATIA.ActiveDocument.Selection.Item(1).value mysel.EndSelectElement Set oAnnotationSet = opart.AnnotationSets opart.UpdateObject oAnnotationSet Set oNewAnno = oAnnotationSet.Add( ISO ) Im Part k ...
| | In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Part / Assembly : ebenen ausblenden
tr am 20.08.2003 um 11:05 Uhr (0)
Hallo Mitschi, das Ein-/Ausblenden von Elementen kann auch über ein einfaches Makro gesteuert werden. Für Ebenen z.B.: Sub CATMain() Dim oDoc As Document Set oDoc = CATIA.ActiveDocument Dim sel As selection Set sel = oDoc.selection sel.Clear sel.Search CATGmoSearch.Plane,all Set visPropertySet1 = sel.VisProperties visPropertySet1.SetShow 0 Ebenen ins Show visPropertySet1.SetShow 1 Ebenen ins NoShow End Sub Das funktioniert für Products und Parts muss aber auch jedesml aktiviert werden. tr
| | In das Form CATIA V5 Part / Assembly wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
