| Правила | Регистрация | Пользователи | Сообщения за день |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > AutoCAD > Автозаполнение ведомости рабочих чертежей

Автозаполнение ведомости рабочих чертежей

Ответ
Поиск в этой теме
Непрочитано 29.10.2007, 09:15 2 |
Автозаполнение ведомости рабочих чертежей
wetr
 
инженер
 
Владивосток
Регистрация: 09.08.2006
Сообщений: 1,535

Те кто видел КОМПАС меня поймут: хочу чтобы ведомость рабочих четрежей заполнялась автоматически. Пользую поля - ссылки на объекты. В моем случае ссылаюсь на блок(рамка) с аттрибутами "№листа" и "наименование листа". Вроде бы все отлично. Убивает трудоемкость создания данной таблицы. Т.е. как я делаю(может не правильно?):
создаем мтекст-вставить поле-объект-выбрать- а дальше проблемка - рамка то находится в лайоутах. А перелистывать лайоуты в режиме выбора нельзя... Приходится сначала открывать лайоут, затем копировать текст вида
"%<\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

Вложения
Тип файла: rar mipgost.rar (6.1 Кб, 1227 просмотров)
Тип файла: dwg
DWG 2004
Пример Ведомость чертежей.dwg (110.4 Кб, 34846 просмотров)
Тип файла: lsp vrc_VVA.lsp (34.6 Кб, 1110 просмотров)

__________________
14 Ибо если вы будете прощать людям согрешения их, то простит и вам Отец ваш Небесный (Мф 6, 14)

Последний раз редактировалось Кулик Алексей aka kpblc, 19.04.2014 в 22:22.
Просмотров: 127601
 
Непрочитано 22.10.2008, 08:31
#141
b00


 
Регистрация: 21.10.2008
Петербург
Сообщений: 19
<phrase 1=


VVA, спасибо!
b00 вне форума  
 
Непрочитано 22.10.2008, 10:43
#142
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,992


>wetr Я имел ввиду имя тега атрибута в блоке
*** Добавлено.
По поводу текста в 1-м посте
Ограничения на Автокад 2008 только из-за того, что там используется многострочный Атрибут. Программе все равно какой, лишь бы тэг совпадал. Поэтому если не использовать многострочные атрибуты, то можно и с 2006 (так как используются поля). Кстати в примере из #139 файл в формате 2004 Автокада и все работает.
Миниатюры
Нажмите на изображение для увеличения
Название: VRC.jpg
Просмотров: 240
Размер:	35.3 Кб
ID:	11347  
__________________
Как использовать код на Лиспе читаем здесь

Последний раз редактировалось VVA, 22.10.2008 в 10:50.
VVA вне форума  
 
Автор темы   Непрочитано 22.10.2008, 10:51
#143
wetr

инженер
 
Регистрация: 09.08.2006
Владивосток
Сообщений: 1,535
<phrase 1= Отправить сообщение для wetr с помощью Skype™


Нету у меня такого...
Миниатюры
Нажмите на изображение для увеличения
Название: пример.jpg
Просмотров: 208
Размер:	67.6 Кб
ID:	11350  
__________________
14 Ибо если вы будете прощать людям согрешения их, то простит и вам Отец ваш Небесный (Мф 6, 14)
wetr вне форума  
 
Непрочитано 22.10.2008, 10:54
#144
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,992


Допускаю, что при пересохранении в формат 2004 Автокад сам меняет имя тэга многострочного атрибута
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Автор темы   Непрочитано 22.10.2008, 11:01
#145
wetr

инженер
 
Регистрация: 09.08.2006
Владивосток
Сообщений: 1,535
<phrase 1= Отправить сообщение для wetr с помощью Skype™


Цитата:
По поводу текста в 1-м посте
Исправил
__________________
14 Ибо если вы будете прощать людям согрешения их, то простит и вам Отец ваш Небесный (Мф 6, 14)
wetr вне форума  
 
Непрочитано 22.10.2008, 14:13
#146
b00


 
Регистрация: 21.10.2008
Петербург
Сообщений: 19
<phrase 1=


Цитата:
Сообщение от wetr Посмотреть сообщение
и еще вопрос ко всем.
Как можно в полях убрать часть текстового значения аргумента. Например, получаю значение "A3 альбомная" а нужно только А3. Может кто помнит???
Цитата:
Сообщение от wetr Посмотреть сообщение
Задача решилась.
Как решилась? Я блок рамки для себя редактировал и поломал это поле Не пойму, как исправить, тоже лезет "А4 альбомная" и т.п. в лучшем случае.
5...6 страницы темы.
b00 вне форума  
 
Автор темы   Непрочитано 22.10.2008, 14:36
#147
wetr

инженер
 
Регистрация: 09.08.2006
Владивосток
Сообщений: 1,535
<phrase 1= Отправить сообщение для wetr с помощью Skype™


b00, зайди в атрибут, вставь поле (Ctrl+F), МестозаполнительБлока(blockplaceholder), ссылка на lookup.
Или скачай заново мой блок
__________________
14 Ибо если вы будете прощать людям согрешения их, то простит и вам Отец ваш Небесный (Мф 6, 14)

Последний раз редактировалось wetr, 22.10.2008 в 15:41.
wetr вне форума  
 
Непрочитано 22.10.2008, 14:57
#148
b00


 
Регистрация: 21.10.2008
Петербург
Сообщений: 19
<phrase 1=


wetr, вот что там сейчас у меня (если через редактор блоков смотреть):
Код:
[Выделить все]
%<\AcObjProp.16.2 Object(?BlockRefId,1).Parameter(93).lookupString>%
Это оно или нет?
Если заново скачаю -- придется заново менять. Тогда и поломать заново могу

Если не через редактор блоков править, то выглядит так:
Миниатюры
Нажмите на изображение для увеличения
Название: example.JPG
Просмотров: 191
Размер:	61.0 Кб
ID:	11373  
b00 вне форума  
 
Автор темы   Непрочитано 22.10.2008, 15:42
#149
wetr

инженер
 
Регистрация: 09.08.2006
Владивосток
Сообщений: 1,535
<phrase 1= Отправить сообщение для wetr с помощью Skype™


Нужно выбрать "МестозаполнительБлока". Но он доступен только из редактора блоков, а не так как ты открываешь.
***Добавлено.
Но сначала нужно для Lookup parameter "Выбор" выставить "Показывать в свойствах" в свойствах. Только после этого он станет доступным в полях как "МестозаполнительБлока"
__________________
14 Ибо если вы будете прощать людям согрешения их, то простит и вам Отец ваш Небесный (Мф 6, 14)

Последний раз редактировалось wetr, 22.10.2008 в 15:47.
wetr вне форума  
 
Непрочитано 22.10.2008, 15:50
#150
b00


 
Регистрация: 21.10.2008
Петербург
Сообщений: 19
<phrase 1=


Цитата:
Сообщение от wetr Посмотреть сообщение
Нужно выбрать "МестозаполнительБлока". Но он доступен только из редактора блоков, а не так как ты открываешь.
Да вроде все так, не знаю...
Цитата:
Сообщение от b00 Посмотреть сообщение
Код:
[Выделить все]
%<\AcObjProp.16.2 Object(?BlockRefId,1).Parameter(93).lookupString>%
А результат не тот
Если картинкой, то см. выделенную строку:
Миниатюры
Нажмите на изображение для увеличения
Название: example1.jpg
Просмотров: 162
Размер:	41.3 Кб
ID:	11374  
b00 вне форума  
 
Автор темы   Непрочитано 22.10.2008, 16:11
#151
wetr

инженер
 
Регистрация: 09.08.2006
Владивосток
Сообщений: 1,535
<phrase 1= Отправить сообщение для wetr с помощью Skype™


выложи файл
__________________
14 Ибо если вы будете прощать людям согрешения их, то простит и вам Отец ваш Небесный (Мф 6, 14)
wetr вне форума  
 
Автор темы   Непрочитано 22.10.2008, 16:15
#152
wetr

инженер
 
Регистрация: 09.08.2006
Владивосток
Сообщений: 1,535
<phrase 1= Отправить сообщение для wetr с помощью Skype™


прочти в посте 149 после слова ***Добавлено
Это как раз для тебя
__________________
14 Ибо если вы будете прощать людям согрешения их, то простит и вам Отец ваш Небесный (Мф 6, 14)
wetr вне форума  
 
Непрочитано 22.10.2008, 16:26
#153
b00


 
Регистрация: 21.10.2008
Петербург
Сообщений: 19
<phrase 1=


Цитата:
Сообщение от wetr Посмотреть сообщение
прочти в посте 149 после слова ***Добавлено
Это как раз для тебя
уффффф!
Починил
Спасибо!
b00 вне форума  
 
Непрочитано 11.11.2008, 11:45
#154
Red Nova

ՃԱՐՏԱՐԱԳԵՏ, Տ.Գ.Թ.
 
Регистрация: 23.10.2007
Торонто
Сообщений: 1,980
Отправить сообщение для Red Nova с помощью Skype™


VVA
У меня возникли проблемы с армянским вариантом программы. Таблицу я настроил, но автокад по видимому имеет аллергию на то, что в таблицах поля с армянскими символами. Либо файл портится, либо такие поля просто пропадают, сначала вроде все как с русским вариантом, но чуток поработаешь и фатал эррор гарантирован . Можно переделать лисп с #69 так, чтобы текст из штампов записывался в таблицу не полем, а просто текстом?
__________________
Блог
Red Nova вне форума  
 
Непрочитано 11.11.2008, 19:11
#155
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,992


У меня сейчас запарка до 20 ноября. Напомни после 20
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 11.11.2008, 19:26
#156
Red Nova

ՃԱՐՏԱՐԱԳԵՏ, Տ.Գ.Թ.
 
Регистрация: 23.10.2007
Торонто
Сообщений: 1,980
Отправить сообщение для Red Nova с помощью Skype™


Запишу в мобильник напоминалку на 21-е.
__________________
Блог
Red Nova вне форума  
 
Непрочитано 21.11.2008, 16:29
#157
Red Nova

ՃԱՐՏԱՐԱԳԵՏ, Տ.Գ.Թ.
 
Регистрация: 23.10.2007
Торонто
Сообщений: 1,980
Отправить сообщение для Red Nova с помощью Skype™


VVA,
Уже 21-е число
__________________
Блог
Red Nova вне форума  
 
Автор темы   Непрочитано 04.02.2009, 15:50
#158
wetr

инженер
 
Регистрация: 09.08.2006
Владивосток
Сообщений: 1,535
<phrase 1= Отправить сообщение для wetr с помощью Skype™


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

Цитата:
Сообщение от Nikolay 2
Цитата:
Сообщение от wetr
Цитата:
Сообщение от Nikolay 2
Еще раз стучусь в ПМ, вопрос такого плана: можно ли организовать выбор листов (проект 125 листов и все в одну табличку....а сворачивает ее Кад в 3-4 столбца не совсем красиво. У VVA в предыдущем варианте была такая функция (вот только сама таблица не совсем нормальная), как ее реализовать можно?
Не совсем понял суть вопроса. Можно поподробней - что не получается?
Если есть аська - то лучше туда пиши или в jabber
Аськи нет, есть Skype. В предыдушей версии у VVA было так: в ком. строке vrc и выпадает менюшка (наверное на vba или делфи), с возможностью выбора листов, котрые будут внесены в ведомость чертежей. Выбираю 1.....35, далее ОК, потом -предложение вставить таблицу - вставляю, потом в ком. строке снова ввожу vrc - выпадает менюшка - выбираю 36....75 - Ок - вставляю таблицу рядом, и т.д. Сейчас возможности выбрать листы, которые будут добавлены в ведомость нет, сразу предлагает вставить таблицу и она формируется из всех листов...
Странно. Зачем 5 раз создавать таблицы, если можно сделать 1 объект и на 5 столбцов разделить.
Я бы так сделал. Если я правильно понял проблему...
Цитата:
а сворачивает ее Кад в 3-4 столбца не совсем красиво
М.б. ты не все настройки таблиц видел? Там можно все сделать.
См. прикрепленный файл.
Или тебе нужна только часть ведомости?
Вложения
Тип файла: rar Рамка.rar (173.2 Кб, 108 просмотров)
__________________
14 Ибо если вы будете прощать людям согрешения их, то простит и вам Отец ваш Небесный (Мф 6, 14)
wetr вне форума  
 
Непрочитано 04.02.2009, 16:45
1 | #159
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,992


>wetr
Версия vrc от 04.02.2008 24.05.2013 23-01-2014.
Добавлена возможность заполнять таблицу полями, текстом, выбирать или нет листы. Подробности в начале лиспа. Протестируй и если нормально, то обнови 1-й пост. Файл для тестирования брать в 1-м посте.
2014-01-23 Добавлена функция BG:GET-TEXTSTRING (как замена vla-get-textstring. Т.к. неверно возвращает строку при наличии юникод символов) Смотреть здесь
Команды:
VRC - таблица с полями, все листы
VRCTS - таблица с Tекстом, выбор (S) листов
VRCTN - таблица с Tекстом, нет (N) выбора листов
VRCFS - таблица с полями (F), выбор (S) листов
Вложения
Тип файла: dwg
DWG 2004
Пример Ведомость чертежей.dwg (110.4 Кб, 2432 просмотров)
Тип файла: lsp vrc_VVA_2018_03_08.lsp (40.9 Кб, 187 просмотров)
__________________
Как использовать код на Лиспе читаем здесь

Последний раз редактировалось VVA, 08.03.2018 в 23:40. Причина: Обработка x64
VVA вне форума  
 
Непрочитано 04.02.2009, 18:10
#160
Nikolay 2


 
Регистрация: 27.02.2008
Сообщений: 140


Цитата:
Сообщение от VVA Посмотреть сообщение
>wetr
Версия vrc от 04.02.2008. Добавлена возможность заполнять таблицу полями, текстом, выбирать или нет листы. Подробности в начале лиспа. Протестируй и если нормально, то обнови 1-й пост. Файл для тестирования брать в 1-м посте. Команды:
VRC - таблица с полями, все листы
VRCTS - таблица с Tекстом, выбор (S) листов
VRCTN - таблица с Tекстом, нет (N) выбора листов
VRCFS - таблица с полями (F), выбор (S) листов
Хоть и не мне адресовалось, но не идет....протокол по F2 приложен

Почему то написал в первый раз, что некорректный файл
Вложения
Тип файла: rar Протокол_.rar (710 байт, 139 просмотров)

Последний раз редактировалось Nikolay 2, 04.02.2009 в 18:30.
Nikolay 2 вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > AutoCAD > Автозаполнение ведомости рабочих чертежей

Размещение рекламы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Автозаполнение ведомости чертежей и автонумерация листов в спдс 6 Кукурузо_Джон_Горыныч ПО от CSoft 34 15.02.2019 08:13
Ведомость рабочих чертежей основного комплекта 13Rossoneri Архитектура 3 22.08.2015 00:21
Аннулирование комплекта рабочих чертежей путем замены Elena.sh Разное 8 26.05.2011 05:47
Хочу быстрее заполнять ведомости рабочих чертежей! a-alex Программирование 2 19.02.2008 19:09