Можно ли в меню создать раскрывающийся список (как список цветов или толщин линий) и как передать выбранное значение в LISP-программу?

[vk]

Кажись, сие доступно только на ObjectARX, но не на Лиспе.

[Pilot]

Если не ошибаюсь:
Раскрывающийся список водможен в диалоговом окне написанном на DCL. Но постоянно на экране, тем более в меню его не будет - вызывать надо.

[vk]

>Pilot
Именно так. Но к меню такой подход уже никакого отношения не имеет.... ну, кроме прописанной в него команды вызова :wink: .

[Lenich]

Можно попробовать в *.mnu файле прописать подобно следующему:

Код:

[Выделить все]

***TOOLBARS

**TB_DIMENSION

ID_DimStyle  [_Control(_dimstyle)]

Может и получится. :wink:

[Pilot]

В Акад-2000 у меня в свое время так не вышло. А в -2005 не пробовал.

[Lenich]

Сам то я вообще не пробовал, просто если бы мне так было нужно, начал бы с этого.

[Stork]

Типа такого что ли?
[ATTACH]1134889567.jpg[/ATTACH]
[ATTACH]1139950664.jpg[/ATTACH]

[eax]

Я вот писал прогу - сетапник для своих утилит AutoCAD. Утилиткимои предстаавляют небольшие ехе-шники, и всё время их тыкать в браузере не хотелось , да свой брауз не хотел писать дляних ....

Для 2006-ого такой сетапник не получился: ну никак не получается сохранить менюшки до следующего сеанса АКАКДа.

var
btn: IAcadToolbarItem;
mn: IAcadPopupMenuItem;
Tb: IAcadMenuGroup;
btnBr: IAcadToolbar;
btn_: IAcadToolbarItem;
Menu: IAcadPopupMenu;
SubMenu1, SubMenu2, SubMenu3, SubMenu4: IAcadPopupMenu;
begin
...
Menu:= Tb.Menus.Add(MineMenus[MineMenusCount]);
SubMenu1:= Menu.AddSubMenu(1, 'Общиефункции');
Macro:= '-vbarun MacrosUn.dvb!ThisDrawing.ACDPROP'+#13;
mn:= SubMenu1.AddMenuItem(SubMenu1.Count+1, 'Настройки', Macro);
mn.HelpString:= 'Настройки AutoCad/СтройУтилит';
mn:= SubMenu1.AddSeparator(SubMenu1.Count+1);
// и т.д.
...
SubMenu2:= Menu.AddSubMenu
(Menu.Count+1, 'Металлоконструкции');
Macro:= '-vbarun MacrosUn.dvb!ThisDrawing.Sortament'+#13;
mn:= SubMenu2.AddMenuItem(SubMenu2.Count+1, 'Профиль
металлопроката', Macro);
mn.HelpString:= 'Черчение профиля металлопроката';
mn.EndSubMenuLevel:= 1;
...
Menu.InsertInMenuBar(AcadDoc.Application.MenuBar.Count-2);
...
end;

[ShaggyDoc]

Сообщение от maxw Можно ли в меню создать раскрывающийся список (как список цветов или толщин линий) и как передать выбранное значение в LISP-программу?

Эти списки находятся не в меню, а в панелях инструментов. Свои создать нельзя. Можно только махинировать со стандартными.

В меню можно вставлять свои разделы и пункты. Или статически, прописывая их в MNU (CUI) или динамически, через объектную модель AutoCAD. Но это уже будут не раскрывающиеся списки (combobox).

Передать значение из любого макроса (из панели или из меню) в LISP-программу можно (через объект), можно и просто ожидание в программе предусмотреть во время какого-то getxxx, но это очень плохое решение. В этом случае пользователь будет обязан выбрать данные именно из меню. А знать этого он не обязан. Подобным образом была сделана АРКО - там в меню База1 и База2 были спрятаны несколько значений в макросе, а пользователь должен был знать, когда их нажимать.

Правильное решение - прятать в макросе вызов функции с заданными аргументами. Тогда, при выборе из меню или панельки, программа уже будет знать требуемые параметры.

Возможны и другие варианты с использованием внешних COM-серверов, когда меню вообще не прикреплено к AutoCAD. В этом случае возможностей гораздо больше, чем у combobox, так как они ограничены и по ширине, и являются линейными. Внешний сервер можно сделать и плавающим и "всегда сверху", и сворачивающимся в полоску.

Например, так:
[ATTACH]1134963574.jpg[/ATTACH]

[ShaggyDoc]

Почему-то картинка растянулась :cry:

А вот это же в развернутом виде:
[ATTACH]1134963738.jpg[/ATTACH]