|
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 ...
|
|
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 ...
|
|
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 ...
|
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
