Можно ли облегчмть пользование командой?

[CITROEN DS 21 0]

Часто вот приходится нырять туда-обратно. Хотел было повесить переключение на клавишу какую-нибудь, но не получилось. Вроде, именно для этой фичи нельзя было(основные команды позволяли это сделать). Может, что-то не так делал?

[newComer 0]

Можно с помощью макроса:

Sub CATMain()

   Dim specsAndGeomWindow1 as specsAndGeomWindow

   Dim viewer3D1 as viewer3D

   Dim viewpoint3D1 as viewpoint3D



   Set specsAndGeomWindow1 = CATIA.ActiveWindow

   Set viewer3D1 = specsAndGeomWindow1.ActiveViewer

   Set viewpoint3D1 = viewer3D1.Viewpoint3D



   viewpoint3D1.ProjectionMode = Abs(CInt(Not CBool(viewpoint3D1.ProjectionMode)))



   Set specsAndGeomWindow1 = Nothing

   Set viewer3D1 = Nothing

   Set viewpoint3D1 = Nothing

End Sub

Далее "Customize/Commands/Macros" выбираете нужный, выбираете иконку, назначаете "Accelerator". Обязательно нужно вытащить эту кнопку на какой-нибудь из Toolbars

Изменено 22 ноября 2005 пользователем newComer

[newComer 0]

Вариант 2:

Если вытащить кнопки "Parallel" и "Perspective" на ToolBar то поле "Accelerator" у них становится доступным,

но в данном случае придётся назначать две комбинации клавиш, для каждой из команд отдельно.

[Luke 0]

, назначаете "Accelerator". Обязательно нужно вытащить эту кнопку на какой-нибудь из Toolbars

<{POST_SNAPBACK}>

Шото у меня не получается, окно акселератора неактивно, иконки не перетаскиваются.

А такая кнопка мне тоже очень нужна.

Изменено 1 декабря 2005 пользователем Luke

[_Shadow_ 6]

Кнопку моно добавить по адресу Customize/*****/

где *****-нужная вам панель.нажать на кнупель Add comands и выбрать скрипт(не забудь сначала сделать иконку)

[_Shadow_ 6]

или тупо перетащить мышкой на нужную панель из окна Commands

на вкладке Customize/Commands

[Yuhoo 0]

А как можно создать кнопку с функцией из меню Tools \ Options...\, если ее нет в Commands?

Например, такую - "Tools \ Options...\Mechanical Design\Sketcher\Geometry\Allow direct manipulation" или любую другую, есть какой-нибудь алгоритм?

[_Shadow_ 6]

1)Добавляем макрос(или пишем сами)надеюсь это вы умеете :)

2)"Customize/Commands/Macros" выбираете нужный, выбираете иконку

3) тупо перетаскиваем его на панель или см на 2 поста выше.

4) наслаждаемся.

[_Shadow_ 6]

PSи если я не ошибаюсь для таких настроек существует специальный класс(а может и не один) в VBA/VBS так что пишите скрипты батенька о_О