Hallo zusammen,
ich bin gerade dabei ein kleines CATScript auf AIX zu schreiben, und komme nicht weiter.
Wie kann ich in einem geladenen *.CATDrawing per Script eine benannte View erzeugen.
Mein Sript funktioniert zwar, aber die View hat keinen Namen.
Bsp. ich möchte eine View "NOTES"
Hier mein bisheriges Script:
Zitat:
Language="VBSCRIPT"Sub CATMain()
Dim drawingDocument1 As Document
Set drawingDocument1 = CATIA.ActiveDocument
Dim drawingSheets1 As DrawingSheets
Set drawingSheets1 = drawingDocument1.Sheets
Dim drawingSheet1 As DrawingSheet
Set drawingSheet1 = drawingSheets1.ActiveSheet
Dim drawingViews1 As DrawingViews
Set drawingViews1 = drawingSheet1.Views
Dim drawingView1 As DrawingView
Set drawingView1 = drawingViews1.Add("Automatic Naming")
Dim drawingViewGenerativeBehavior1 As DrawingViewGenerativeBehavior
Set drawingViewGenerativeBehavior1 = drawingView1.GenerativeBehavior
drawingViewGenerativeBehavior1.DefineFrontView 1.000000, 0.000000, 0.000000, 0.000000, 1.000000, 0.000000
drawingView1.x = 420.000000
drawingView1.y = 297.000000
Dim double1 As Double
double1 = drawingSheet1.Scale
drawingView1.Scale = 1.000000
drawingView1.Activate
End Sub
Mit der Doku aus V5Automatisation.chm komme ich nicht zurecht, wer kann mit da helfen?
Doku:
SetViewName( CATBSTR iViewNamePrefix, CATBSTR iViewNameIdent, CATBSTR iViewNameSuffix)
------------------
Gruss CT_Thomas
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP