Здесь вы можете скачать документацию и программы для САПР AutoCAD, PCAD, 3DS, Inventor, Pro/E, Solidworks и других CAD CAM CAE EDA GIS

Добавление панелей инструментов к программам на LISP

Barry Bowen
Cadalyst

Панели инструментов является необходимой частью разрабатываемого вами приложения. Они обеспечивают эффективный и дружественный к пользователю доступ к вашей программе. Они также позволяют отделять вашу программу от меню AutoCAD. Создание шаблона панели инструментов довольно просто. После того как вы имеете этот шаблон, вы можете быстро добавлять в будущем панели инструментов к интерфейсу вашей программы. Однако, я не советую использовать кнопку Customize в диалоговом окне Toolbars в AutoCAD, чтобы создавать ваши панели инструментов. Вы должны держать вашу систему меню отдельно от AutoCAD, создавая ваши собственные отдельный файлы описывающие панели инструментов.

С чего начать

Прежде всего, с помощью текстового редактора, к примеру Notepad, создадим новый файл с именем TOOLBAR.MNS в папке где находиться ваша программа. Здесь будут храниться шаблоны панелей инструментов для всех частичных панелей инструментов, которые вы собираетесь создавать. Обратите внимание на то, что мы используем расширение MNS, а не MNU.

В текстовом редакторе наберите код показанный ниже, а затем сохраним его для использования в будущем, попутно заменив элементы, написанный наклонным шрифтом на ваши собственные.

;;;note:replace items in italic with your own names
***MENUGROUP=MYPROGRAM
***TOOLBARS
**TB_MY_PROGRAM
[_Toolbar(My Program ,_Floating,_Show,742,121,1)]
[_Button(Name1 ,image1.bmp ,image1.bmp )]^C ^C
[_Button(Name2 ,image2.bmp ,image2.bmp )]^C ^C
[_Button(Name3 ,image3.bmp ,image3.bmp )]^C ^C
[_Button(Name4 ,image4.bmp ,image4.bmp )]^C ^C
[_Flyout(Flyout1 ,image5.bmp ,image5.bmp , _OtherIcon,FLYOUT1.MYPROGRAM)]
**TB_FLYOUT1
**FLYOUT1
[_Toolbar(Flyout1 ,_Floating,_Show,742,121,1)]
[_Button(Name5 ,image5.bmp ,image5.bmp )]^C ^C
[_Button(Name6 ,image6.bmp ,image6.bmp )]^C ^C

Далее с помощью тестового редактора создадим файл, который будет загружать меню нашего приложения на AutoLISP. Сохраним этот файл как TOOLBAR.MNL. Он будет содержать следующее:

;;;TOOLBAR.MNL
(setq MYPATH c:/myprogram/)
(load (strcat MYPATH MYPROGRAM ))
(princ)

Когда AutoCAD загружает файл меню панели инструментов, MNL-файл с тем же самым именем загружается и исполняется, устанавливая путь (MYPATH) и загружая программу на AutoLISP (MYPROGRAM).

Создание ваших иконок

Вы можете создавать иконки из редактора в панели инструментов AutoCAD или в другой программе, к примеру Microsoft Paint. Иконки имеет размер 1615, AutoCAD 2000 может растягивать их, если включен режим больших значков. Сохраните созданные вами иконки в ту же папку, как и файл меню, и добавьте путь к ним в AutoCAD. Загрузка файл без указания пути к файлам иконок влечет за собой отображение панели инструментов с улыбающимися рожицами, как показано на рисунке ниже.

Что делать если отображаются улыбающиеся рожицы

Улыбающиеся рожицы в вашей панели инструментов указывают на то, что AutoCAD не может найти файлы иконок. Чтобы исправить это, необходимо добавить путь к иконкам. Выберите в AutoCAD в падающем меню Tools пункт Options. В панели File кликните на символе плюс (+) перед строкой Support File Search Path. Кликните на кнопке Add, а затем на Browse, чтобы указать каталог, в котором находятся иконки.

Затем кликните на OK и закройте диалоговое окно и сам AutoCAD. Откройте Explorer и перейдите в нем в каталог, где вы сохранили файлы меню и иконки. Удалите там файлы MNC и MNR. Затем снова загрузите AutoCAD, иконки в панели инструментов должны отобразиться корректно.