Adds a new named view to the document.
Rhino.AddNamedView (strName [, strView])
|
strName |
Required. String. The name of the new named view. |
|
strView |
Optional. String. The title or identifier of the view to save. If omitted, the current active view is saved. |
|
String |
The name of the newly created named view if successful. |
|
Null |
If not successful, or on error. |
Dim arrViews, strView, strName
arrViews = Rhino.ViewNames
If IsArray(arrViews) Then
For Each strView In arrViews
strName = strView & "_view"
Rhino.AddNamedView strName, strView
Next
End If