|
CATIA V5 Programmierung : Darstellungssymbole von 2D-Punkten ändern
Banka am 11.01.2005 um 12:04 Uhr (0)
Hallo zusammen, ich möchte per CATScript (CATIA V5 R12 SP3) die Darstellungssymbole von Punkten in Skizzen ändern... Set MySketch = MyPart.FindObjectByName( SketchName ) If TypeName(MySketch) Nothing Then MySelection.Add (MySketch) MySelection.VisProperties.SetSymbolType 4 End If Dieses funktioniert leider nicht. Wüsste einer von euch wie ich es lösen könnte? Die anderen Eigenschaften (Farbe, LinienTyp, Linienstärke) lassen sich auf dieser Weise problemlos setzen. Nur bei den Darstellung ...
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Properties von 2D Punkten bearbeiten
Banka am 14.01.2005 um 18:55 Uhr (0)
Hallo zusammen, ich habe vor 3 Tagen dieses Problem angebracht und möchte hiermit einen TestCode mit entsprechendem Testmodell bereitstellen, damit ihr direkt testen könnt. Also Anhang bitte betrachten. ich möchte per CATScript (CATIA V5 R12 SP3) die Darstellungssymbole von Punkten in Skizzen ändern. Diese sollen dann nun immer sichtbar bleiben. hier der Code: Sub CATMain() Dim MyDocs As Documents Set MyDocs = Catia.Documents Dim MyDoc As PartDocument Set MyDoc = MyDocs.Item("TestPart.CATPart") D ...
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Instance ID umbenennen
Banka am 17.01.2005 um 18:02 Uhr (0)
Hallo Dieter, probiere mal folgendes: Sub CATMain() Dim MyProduct As Product Set MyMainProduct = CATIA.ActiveDocument.Product MyMainProduct.PartNumber = P1 Dim MyPartProduct1 As Product Set MyPartProduct1 = CATIA.ActiveDocument.GetItem( Product1 ) MyPartProduct1.PartNumber = P2 Dim MyMainProducts As Products Set MyMainProducts = MyMainProduct.Products Dim MyInstanceProduct1 As Product Set MyInstanceProduct1 = MyMainProducts.Item( Product1.1 ) MyInstanceProduct1.Name = P2 Dim MyPartProduct2 As Product ...
| In das Form CATIA V5 Programmierung wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |