[TheBuTeK]

Скажите, а насколько реально стандартными средствами Lisp (ActiveX) сделать следующее?

Дано:
1. Текстовый файл с именем 01_Name.txt, содержащий некие данные, написанные построчно
(типа:
Значение1
Значение2
Значение3…).
2. Происходит вставка блока, имеющего атрибут с тэгом, к примеру, 01_Name. Этому атрибуту автоматически должно быть присвоено значение одной из строк подобного файла.

Требуется:
1. Создать панель с выпадающим списком, похожую на панель «Стили». В списке на этой панели содержатся все возможные значения атрибута с тэгом 01_Name из файла 01_Name.txt.

2. В итоге сделать так, чтобы при вставке блока с атрибутом 01_Name происходило заполнение этого атрибута тем значением, что стоит текущим в списке на панели, если блок содержит атрибут с этим тэгом.

Примечание:
Блок может вставляться как командой INSERT, так и с инструментальной палитры.

[Елпанов Евгений]

Сообщение от TheBuTeK 1. Создать панель с выпадающим списком, похожую на панель «Стили».

Это ARX...

[Кулик Алексей aka kpblc]

Ничего не понял. "К примеру" - неалгоритмитизируемо в принципе. А так-то, назначать значения атрибутам по маске - достаточно просто.
---
Добавлено: может, имеется в виду DropDownLilst в DCL

[TheBuTeK]

Ну да, сформулировал криво, согласен.
Попробую еще раз.
DropDownList - это само собой. Но вопрос не об этом. В сущности, вопросов два.
Первый вопрос в том, как сформировать маску для заполнения значений атрибутов?
Можно ли создать свою панель инструментов, на которой поместить список, заполняемый из текстового файла, брать из него текущее значение и помещать в атрибут с определенным тэгом?
Второй вопрос в том, что при вставке блока командой INSERT и вставке блока с палитры используются разные команды. И возможно ли на любую из этих команд прописать дополнительный макрос заполнения атрибута непосредственно при вставке блока?

[Кулик Алексей aka kpblc]

Я б подумал насчет командных реакторов, а для ToolPalettes - собственные лиспы вместо штатной _insert

[TheBuTeK]

Стоп, так ведь с ToolPalettes запускается команда EXECUTETOOL.

[Кулик Алексей aka kpblc]

А также тот лисп, который захочется.

[TheBuTeK]

Алексей, а разве лисп можно повесить на эту команду? Помнится, в свое время обсуждалась именно невозможность дополнительной навески утилит на нее:
http://dwg.ru/f/showthread.php?t=14078.

Вопрос с панелью инструментов по-прежнему интересен чрезвычайно!

[Кулик Алексей aka kpblc]

Так ShaggyDoc же там все рассказал... А насчет варианта cоздания лиспов - см.аттач.