Dim oCamera3D As INFITF.Camera3D
Set oCamera3D = CATIA.ActiveDocument.Cameras.Item(6) 'Top View
CATIA.ActiveWindow.ActiveViewer.Viewpoint3D = oCamera3D.Viewpoint3D
...
CATIA.StartCommand "* front" ' -> Front View
CATIA.StartCommand "* back" ' -> Back View
CATIA.StartCommand "* top" ' -> Top View
CATIA.StartCommand "* bottom" ' -> Bottom View
CATIA.StartCommand "* left" ' -> Left View
CATIA.StartCommand "* right" ' -> Right View
CATIA.StartCommand "* iso" ' -> ISO View
...
booSter писал(а):Любая из этих команд равнозначна нажатию соответствующей кнопки на тулбаре (включая анимацию разворота/центровки въю-поинта)
brigval писал(а):Список команд можно где-то взглянуть?
brigval писал(а):Как теперь повернуть деталь вокруг оси Z на 90°
RDV писал(а):CATIA.ActiveWindow.ActiveViewer, Viewer3D.Viewpoint3D
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 9