All Frameworks Object Hierarchy This Framework Indexes
| o Property FieldOfView( | ) As |
HalfAngle = NiceViewpoint.FieldOfView
| o Property FocusDistance( | ) As |
NiceViewpoint.FocusDistance = 10
| o Property ProjectionMode( | ) As |
My3DViewer.Viewpoint3D.NavigationStyle = catProjectionConic
| o Property Zoom( | ) As |
ZoomFactor = NiceViewpoint.Zoom If ZoomFactor > 2 Then ZoomFactor = 1 NiceViewpoint.Zoom(ZoomFactor) End If
| o Sub GetOrigin( | origin) |
Dim origin(2) NiceViewpoint.GetOrigin origin
| o Sub GetSightDirection( | oSight) |
Dim sight(2) NiceViewpoint.GetSightDirection sight
| o Sub GetUpDirection( | oUp) |
Dim up(2) NiceViewpoint.GetUpDirection up
| o Sub PutOrigin( | origin) |
NiceViewpoint.PutOrigin Array(10, 25, 15)
| o Sub PutSightDirection( | oSight) |
NiceViewpoint.PutSightDirection Array(1.414, 1.414, 0)
| o Sub PutUpDirection( | oUp) |
NiceViewpoint.PutUpDirection Array(0, 0, 1)
Copyright © 2003, Dassault Systèmes. All rights reserved.