Плавающая и пристыкованная панели

Чтобы сделать панель плавающей следует использовать метод Float, принимающий три параметра: top, left и NumberFloatRows. Для создания пристыкованной панели используйте метод Dock, принимающий три параметра: Side, Row, Column. Пример создания такой панели:

Sub DockToolbar() Dim currMenuGroup As AcadMenuGroup Set currMenuGroup = ThisDrawing.Application.MenuGroups.Item(0) ' Создадимпанель Dim newToolbar As AcadToolbar Set newToolbar = currMenuGroup.Toolbars.Add("TestToolbar") ' Добавим кнопки с одним и тем же макросом для простотыDim newButton1 As AcadToolbarItem Dim newButton2 As AcadToolbarItem Dim newButton3 As AcadToolbarItem Dim openMacro As String ' Назначиммакрос openMacro = Chr(3) + Chr(3) + Chr(95) + "open" + Chr(32) Set newButton1 = newToolbar.AddToolbarButton("", "NewButton1", "Open a file.", openMacro) Set newButton2 = newToolbar.AddToolbarButton("", "NewButton2", "Open a file.", openMacro) Set newButton3 = newToolbar.AddToolbarButton("", "NewButton3", "Open a file.", openMacro) ' Отобразимпанель newToolbar.Visible = True ' Пристыкуем к левому краю экрана newToolbar.Dock acToolbarDockLeftEnd Sub

Для удаления кнопки из панели используется метод Remove когда панель инструментов видима.

Свойства элементов панели инструментов

Tag, Name, Macro, HelpString, Index, Type (acButton, acToolButtonSeparator, acControl), Flyout, Parent, и другие - задающие пристыковку, видимость и т.д.

Создание макросов

Макросы представляют собой серию команд, выполняющих определенные действия. Если команда, вызываемая макросом, принимает параметры, то нужно знать в какой последовательности. Каждый символ имеет значение - и даже пробел. Последовательность параметров может меняться от версии к версии AutoCAD. Когда команда вводится из пункта меню, значения системных переменных PICKADD и PICKAUTO равны 1 и 0 соответственно для совместимости с предыдущими версиями AutoCAD.

Таблица соответствия комбинация клавиш ascii-символам

Символ	ASCII -эквивалент	Описание
;	chr(59)	Enter
^M	chr(97)+chr(77)	Enter
^I	chr(94) + chr(124)	TAB
пробел	chr(32)	Пробел
\	chr(92)	Ожидание ввода от пользователя
-	chr(95)	Перевод команд и ключевых слов
+	chr(43)	Продолжение макроса на другой строке
=*	chr(61) + chr(42)	Отображает меню
*^C^C	chr(42)+chr(94)+chr(67)+chr(94)+chr(67)	Повторять команду
$	chr(36)	Загрузка секции меню или начало DIESEL-выражения
^B	chr(94)+chr(66)	Включить-выключить привязку
^C	chr(94)+chr(67)	Отмена команды
ESC	chr(3)	Отмена команды
^D	chr(94)+chr(68)	Включить-выключить координаты
^E	chr(94)+chr(69)	Установить следующую изометрическую плоскость
^G	chr(94)+chr(71)	Включить-выключить сетку
^H	chr(94)+chr(72)	BackSpace
^O	chr(94)+chr(79)	Включить-выключить Орто
^P	chr(94)+chr(80)	Включить-выключить MENUECHO
^Q	chr(94)+chr(81)	Эхо на принтер
^T	chr(94)+chr(84)	Включить-выключить Tablet
^V	chr(94)+chr(86)	Сменить видовой экран
^Z	chr(94)+chr(90)	Подавить автоматическое добавление пробела в конце

При выполнении макросов AutoCAD помещает пробел в конец, перед выполнением последовательности команд. Когда это не желательно (например, для команд TEXT или DIM) команда может завершаться Enter, а не пробелом. Также иногда требуется более одного пробела или Enter, но некторые текстовые редакторы не позволяют создавать строки с концевыми пробелами. Для избежания этой проблемы используются два специальных соглашения:

· когда в макросе встречается точка с запятой AutoCAD заменяет ее на Enter,

· если строка заканчивается управляющим символом (обратный слэш, плюс или точкаСзапятой) AutoCAD не добавляет пробел.

Обратный слэш вызывает ввод параметров команды пользователем, и обычно после ввода одного параметра продолжается выполнение макроса. Значит невозможно создать макрос, принимающий переменное число параметров и продолжающего выполнение (как например при выборе объектов). Одно исключение сделано для команды SELECT. Например следующий макрос

select \change previous;properties color red;

позволяет выбрать несколько объектов, затем вызывается команда Change с опцией Previos и меняется цвет у выбранных объектов. Так как обратный слэш используется для ожидания ввода, его нельзя использовать для других действий. Поэтому при указании пути к файлу в качестве разделителя используется прямой слэш. Следующие обстоятельства задерживают выполнение макроса:

· если ожидается ввод точки режим объектной привязки может предварять ввод актуального значения;

· если используется фильтр XYZ макрос приостанавливается до тех пор, пока не будет накоплена точка;

· если вызывается команда SELECT;

· если пользователь вводит прозрачную команду;

· если пользователь запускает другой макрос.

Перед началом выполнения макроса рекомендуется использовать последовательность ^C^C, чтобы отменить выполнение предыдущей команды. Для выполнения макроса в цикле используется *^C^C (при этом в самом макросе уже нельзя использовать ^C, т.к. это приведет к его прерыванию). Пример: *^C^CMOVE Single.