Zooms to the extents of selected objects in the specified view, or in the active view.
Rhino.ZoomSelected ([strView [, blnAll]])
|
strView |
Optional. String. The title or identifier of the view. If omitted, the current active view is used. |
|
blnAll |
Optional. Boolean. Zoom selected in all views. If omitted, only the specified view is zoomed (False). |
Null.
Dim strObject, arrSize
strObject = Rhino.GetObject("Select object", , , True)
If Not IsNull(strObject) Then
strView = Rhino.CurrentView
Rhino.ZoomSelected strView
End If