Есть ли возможность задать ориентацию в модели?

[lavgirb]

Есть ли возможность задать ориентацию в модели?
Кроме разных видов масштабирования.
Если есть, то как сделать?
В ручную это делается таким окошком

Спасибо.

[GenTAPo]

Так строка "Настройка" для этого и сделана. Предварительно разместите модель в окне построения. Потом выберите ориентацию - Настройка - Сохраните с названием вашего варианта. Если надо потом при построении чертежа сделайте этот вид главным. Все дела.

[lavgirb]

Спасибо за отклик.
Но я имел ввиду как поменять ориентацию программно.
Все что мне доступно, просмотрел. Ничего подходящего не нашел.
Пока создается впечатление, что это в API КОМПАС-3D пока не реализовано.
Но хотелось бы чтоб было )

[Валерий Изранов]

Очень важно и будет единственно правильно, когда создание
новой Детали и новой Сборки начинается с уже установленной
Y-ориентации. Это когда X направо, Y вверх а Z на себя.
Для этого нужно создать пустые документ Детали и документ Сборки
с Y-ориентацией. В документе можно задать еще много чего полезного.
И сохранить его как ШАБЛОН. Имя желательно начать с буквы А.
Эта буква А поднимет вверх в списке. "АДеталька" например.
При создании нового документа Компас позволяет создать Документ
и Документ по шаблону. Всегда выбирайте Документ по шаблону.
И жизнь ваша намного облегчится.

[Doom]

В хелпе указано что viewProjectionScheme => vp_Dio(10) - Диметрия
iDocument3D => GetViewProjectionCollection => viewProjectionScheme

[GenTAPo]

Очевидно, что реализовано. Первый скриншот, диметрия после генерации модели в приложении ВиМП.

Второй скриншот, диметрия этой же детали, после других видов, в диметрии КОМПАС.

Обратите внимание на разное расположение системных плоскостей. Я не программист, но очевидно, что можно назначать диметрию по отношению к плоскостям. А раз так, то можно и по отношению к своей созданной плоскости.

[lavgirb]

В хелпе указано что viewProjectionScheme => vp_Dio(10) - Диметрия
iDocument3D => GetViewProjectionCollection => viewProjectionScheme

Doom, большое спасибо!
Это то что нужно.
(Диметрия случайно оказалась выделенной при получении скриншота)
Мне нужно показывать один из трех видов в разное время
Вот что получилось

Код Выделить Развернуть

Private Sub ViewOrientation(ByVal enumViewOrientation As ksRelativeProjectionTypeEnum)
 
  'enumViewOrientation = ksPtUp      ' Вид сверху
  'enumViewOrientation = ksPtDown    ' Вид снизу
  'enumViewOrientation = kksPtIsoXYZ  ' Изометрия
 
  Dim oDoc3D_5            As Kompas6API5.Document3D
  Dim oViewProjColl_5    As Kompas6API5.ViewProjectionCollection
  Dim oViewProjection_5  As Kompas6API5.ViewProjection
 
  Set oDoc3D_5 = moKO.ActiveDocument3D
  Set oViewProjColl_5 = oDoc3D_5.GetViewProjectionCollection
  oViewProjColl_5.viewProjectionScheme = ksVPSZ90AxonometricISO ' Схема Z(ISO)-аксонометрия
  Set oViewProjection_5 = oViewProjColl_5.GetByIndex(enumViewOrientation)
  oViewProjection_5.SetCurrent

  oDoc3D_5.ZoomPrevNextOrAll ksZoomAll
End Sub