[wetr]

Те кто видел КОМПАС меня поймут: хочу чтобы ведомость рабочих четрежей заполнялась автоматически. Пользую поля - ссылки на объекты. В моем случае ссылаюсь на блок(рамка) с аттрибутами "№листа" и "наименование листа". Вроде бы все отлично. Убивает трудоемкость создания данной таблицы. Т.е. как я делаю(может не правильно?):
создаем мтекст-вставить поле-объект-выбрать- а дальше проблемка - рамка то находится в лайоутах. А перелистывать лайоуты в режиме выбора нельзя... Приходится сначала открывать лайоут, затем копировать текст вида
"%<\AcObjProp Object(%<\_ObjId 2130566400>%).TextString>%"
в отдельный файл, затем вставлять в нужное мне поле. Есть другие варианты узнать ObjID? Или другие варианты создать эту таблицу?
И еще: в каких случаях меняется этот ID? А то я боюсь теперь эти блоки редактировать - все собьется нафиг
*******************************************************************************************************************
...Прошел год
VVA сделал отличную программу по созданию Ведомости рабочих чертежей (Компас отдыхает)

ВОЗМОЖНОСТИ:
- Ведомость создается в виде таблицы с полями.
- Обязательно использование блока с атрибутами "ЛИСТ" и "НАИМЕНОВАНИЕ.ЧЕРТЕЖА".
- Таблицы вставляется в слое _Таблица. Если слоя нет - он создается. Настройки слоя можно поменять в ЛИСПе
- Таблицы вставляются в Стиле таблиц "Ведомость чертежей" оформленной по ГОСТу. Настройки стиля см. в ЛИСПе
- Запускать командой VRC в командной строке или сделать себе кнопку


ОСОБЕННОСТИ:
- В таблице и блоке используется шрифт "MIPGOST.SHX". Скачать можно здесь. Не нравится? Открывай код и меняй под себя.
- В блок-рамке используется многострочный атрибут, который работает только в AutoCAD 2008 и старше.
Если у вас более ранняя версия - программа будет работать, но атрибут будет однострочный.
- При заполнении многострочного атрибута "НАИМЕНОВАНИЕ.ЛИСТА" не используйте ENTER. Текст перескочит на новую строку сам.(Это актуально если лисп вставляет поля. Варианты лиспа VRCTS и VRCTN отрабатывают без проблем)

ПРО БЛОК:
- Рамка пестрит полями - название проекта заполнять на титульном листе, в рамке обновится
- ШИФР проекта заполнять на титульном листе
- Формат листа - ссылка на lookup внутри блока, обновляется.
- Для того, чтобы количество листов прописывалось автоматом, я сделал себе макрос на кнопку, запускающую VRC

^C^C(setvar "USERI1" (length(layoutlist)));_updatefield;all;;vrc

Внимание! Если у вас используется переменная USERI1, могут возьникнуть проблемы!
**********************

Для тех, кому не нравиться что программа создает стили и слои, вариант от VVA и Red Nova

************************************
***Обновление от 04.02.2008. **********
************************************
Добавлена возможность заполнять таблицу полями, текстом, выбирать или нет листы. Подробности в начале лиспа.
Команды:
VRC - таблица с полями, все листы
VRCTS - таблица с Tекстом, выбор (S) листов
VRCTN - таблица с Tекстом, нет (N) выбора листов
VRCFS - таблица с полями (F), выбор (S) листов

************************************
***Обновление от 06.09.2010. ***********
***********************************
Добавлена возможность выбора стиля таблиц
Версия для x64 : http://forum.dwg.ru/showpost.php?p=349807&postcount=159

[wetr]

...опишу как подобное сделано в ruCAD на алгоритмическом уровне

ShaggyDoc, да где ж наконец взять это счастье-то?

[ShaggyDoc]

Сообщение от wetr ShaggyDoc, да где ж наконец взять это счастье-то?

Так я не для рекламы, чтобы "взять", а чтобы обратить внимание на принципиальную постановку задачи - не надо искусственно придумывать какую-то систему именования вкладок. Она должна быть естественной - имя вкладки=название чертежа.

Вот тогда VVA и сделал бы по такому ТЗ. А он делал по неудачной (на мой взгляд) первоначальной идее.

[Red Nova]

VVA
Спасибо за диалог выбора листов. (хотя честно говоря пока не опробовал)
Я тоже за мысль заменить поля текстом. Может сделаешь такой вариант? Пока на всякий случай подожду с обновлением #69

[Red Nova]

ShaggyDoc,

не надо искусственно придумывать какую-то систему именования вкладок. Она должна быть естественной - имя вкладки=название чертежа.

У нас листов много. Удобнее нумеровать.

[Red Nova]

Выкладываю последний вариант примера создания ведомости по ГОСТ, с учетом выбора листов.
Настройки по ГОСТ.
В архиве файл со штампом, ReadMe, использованные шрифты и два лиспа (в первом в графу примечание вписывается поле тома чертежа, во втором графа примечания пуста)

[dextron3]

Offtop: VVA, хотел спросить можно ли как то в лайаутах если написано к примеру текстом желтого цвета делать выборку именно этого цвета, в каждом лайауте потом собирать все в кучу, при этом если по два текста на лайауте то их в одну строчку выписывать, если можно то у меня родился алгоритм, без всяких таблиц и полей, буду ждать ответа...

[u77]

А нельзя ли в этот лисп добавить выбор папки , т.к. бывают проекты большие, и файлов много . (листы все пронумерованны и штампы заполненны)

[andery]

У меня такой вопрос возник ,
как сделать чтоб номер (название) листа біло в номере на штампе.
Использование полей выдает #### ....

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

В поле выбирай Diesel Expression и в качестве кода вбить

Код:

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

$(getvar,"ctab")

[dextron3]

Red Nova, а мне не нравиться вариант с таблицами я обычно бз них делаю

[andery]

Кулик Алексей aka kpblc
спасибо!
Сам бы никогда не догадался )))
такой вопрос:
Почему такое не предусмотрено в "стандартных" полях?
И зачем эти поля "название листа" "номекр листа" если они не работуют?
Или они работают тока с подшивками?

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

Я говорил про "чистый" AutoCAD, без привязки к подшивкам. По-моему (могу и ошибаться!) поля "Название листа" и "Номер листа" работают только с подшивкой и никак иначе. Кто профи - пусть рассудит.

[asys]

Сообщение от Кулик Алексей aka kpblc В поле выбирай Diesel Expression и в качестве кода вбить Код: [Выделить все] $(getvar,"ctab")

круто, спасибо kpblc

[wetr]

Кулик Алексей aka kpblc, а ты не знаешь как получить число закладок в файле. Хочу вставить поле в рамку - "Листов"

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

По-моему, это реализовывается только через подшивку. Количество закладок (пространств листа) в текущем документе можно вычислить лисповой функцией (layoutlist), но как ее в DIESEL подставить - не представляю. У меня не получилось.
Лисповое выражение (length (layoutlist)) работает корректно, но вот DIESEL отказывается принимать $(length,$(layoutlist))
Может, я неверно описываю DIESEL-выражение?

[wetr]

и еще вопрос ко всем.
Как можно в полях убрать часть текстового значения аргумента. Например, получаю значение "A3 альбомная" а нужно только А3. Может кто помнит???

[DEM]

Вот пример автозаполнения с помощью таблицы СПДС-графикс

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

wetr, DIESEL:

Код:

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

$(substr,"A2 asd",1,2)

[wetr]

Спасибо, Алексей! Буду пробовать

[wetr]

Кулик Алексей aka kpblc, что то не обновляется.

Формат %<\AcDiesel $(substr,"%<\AcObjProp Object(1910331576).Parameter(93).lookupString \f "%tc3">%",1,2)>%

не обновляет поля. "A3 альбомная" отнимает альбомная, остается А3. Но при изменении значения лукапа на "А2 альбомная", например, поле не обновляется.