[rzinnurov]

На листе с технологией размещено оборудование в виде блоков с атрибутами, которые впоследствии планируется загнать в СПДС таблицу путем связки таблицы и блоков, но вот загвоздка: создал много блоков с атрибутами, и некоторые атрибуты в составе блока имеют свойства “постоянный” – значение “да”, а такие атрибуты получаются невидимыми для спецификации, т.е. нужно у блоков поменять значение параметра “постоянный” на “нет”. Выбирать и редактировать каждый блок и в нем атрибуты долго и муторно (блоков не один десяток). Помогите: нужен лисп или vba для быстрого ЛИБО ДЛЯ МАССОВОГО редактирования свойств атрибута.
PS технологию выдать надо было как обычно "вчера"

Сообщение от rzinnurov Выбирать и редактировать каждый блок и в нем атрибуты долго и муторно (блоков не один десяток)

rzinnurov, у вас в файле 8 блоков (3 из них Вам редактировать точно не придется). Так что по одному выделяем, заходим в редактор блоков и ручками правим необходимые настройки...
Следует различать описания блоков (в Вашем файле - 8 штук), в которых содержится вся основная информация о них, и вхождения блоков (в Вашем файле - 744 штуки), которые являются частными случаями отображания блоков.

[Alan]

PS

Сообщение от rzinnurov На листе с технологией размещено оборудование в виде блоков с атрибутами, которые впоследствии планируется загнать в СПДС таблицу путем связки таблицы и блоков, но вот загвоздка: создал много блоков с атрибутами, и некоторые атрибуты в составе блока имеют свойства “постоянный” – значение “да”, а такие атрибуты получаются невидимыми для спецификации, т.е. нужно у блоков поменять значение параметра “постоянный” на “нет”. Выбирать и редактировать каждый блок и в нем атрибуты долго и муторно (блоков не один десяток). Помогите: нужен лисп или vba для быстрого ЛИБО ДЛЯ МАССОВОГО редактирования свойств атрибута. PS технологию выдать надо было как обычно "вчера"

Если смотреть на задачу поширшее, то наверное надо говорить "Спецификация оборудования". А тогда лучше воспользоваться поиском по этим словам. ЯТД
Писал неоднократно на эту тему. Попробуйте посмотреть на соседнем форуме http://www.caduser.ru/forum/index.ph...#message187202

[Makswell]

Программа меняет свойство "Постоянный" атрибутов всех выбранных блоков с "Да" на "Нет". Также меняет это свойство в описании блоков, и соответственно во всех вхождениях данного блока, присутствующих в рисунке.

Код:

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

(defun test (/ ss n ent lst)
  (setq	ss  (ssget '((0 . "INSERT")))
	n   0
	lst '()
  )
  (while (setq ent (ssname ss n))
    (setq ent	  (vlax-ename->vla-object ent)
	  blk_nam (vla-get-EffectiveName ent)
    )
    (if	(and (not (member blk_nam lst))
	     (= (vla-get-HasAttributes ent) :vlax-true)
	)
      (setq lst (cons blk_nam lst))
    )
    (setq n (1+ n))
  )
  (foreach item	lst
    (setq ent (vla-Item	(vla-get-Blocks
			  (vla-get-ActiveDocument (vlax-get-acad-object))
			)
			item
	      )
    )
    (vlax-for fam_item ent
      (if (= (vla-get-ObjectName fam_item) "AcDbAttributeDefinition")
	(if (= (vla-get-Constant fam_item) :vlax-true)
	  (progn
	    (vla-put-Constant fam_item :vlax-false)
	    (vl-cmdf "_.ATTSYNC" "_N" item)
	  )
	)
      )
    )
  )
  (princ)
)

[rzinnurov]

Сообщение от Makswell Программа меняет свойство "Постоянный" атрибутов всех выбранных блоков с "Да" на "Нет". Также меняет это свойство в описании блоков, и соответственно во всех вхождениях данного блока, присутствующих в рисунке.

Makswell это то что нужно: как глоток воды после дня в пустыне. Нет, как литр воды!
БОООЛЬШОЕ СПАСИБО

я начинаю с лиспом дружить, немного код подправил: "defun test" исправил на "defun c:test"

PS Я возможно уже надоел совсем, если на этот вопрос не получу ответа в виде лиспа, не буду сильно расстраиваться. Ситуация такая, уже создал базу блоков, и вот сейчас нашел в ней еще проблемы (как с постоянным атрибутом да/нет). Суть новой проблемы такова, переименовать имя атрибута с "ПОЗИЦИЯ" на "0№"." Еще раз повторюсь, это не срочно, не обязательно, и очень ИМХО нагло, а наглеть не хотелось бы

[Alan]

Сообщение от rzinnurov Makswell это то что нужно: как глоток воды после дня в пустыне. Нет, как литр воды! БОООЛЬШОЕ СПАСИБО я начинаю с лиспом дружить, немного код подправил: "defun test" исправил на "defun c:test" PS Я возможно уже надоел совсем, если на этот вопрос не получу ответа в виде лиспа, не буду сильно расстраиваться. Ситуация такая, уже создал базу блоков, и вот сейчас нашел в ней еще проблемы (как с постоянным атрибутом да/нет). Суть новой проблемы такова, переименовать имя атрибута с "ПОЗИЦИЯ" на "0№"." Еще раз повторюсь, это не срочно, не обязательно, и очень ИМХО нагло, а наглеть не хотелось бы

Посылал я вас на первоисточник в ссылке. Там есть упоминание книги "САПР на базе..." а в ней описаны принципы создания библиотеки блоков и потом спецификации.
Понимаете, не атрибуты надо менять а сразу правильно составлять библиотеки. Мы делали свои еще до написания книги, т.е. по-своему.
Как пример, даю файлик, сделанный на "чужой" подоснове из Архикада (ногами не бить за слои), технологической части проекта (медицинской).
Вот с такого файла легко считывается инфа в 9-ти позиционную спецификацию.

[rzinnurov]

Сообщение от Alan Посылал я вас на первоисточник в ссылке. Там есть упоминание книги "САПР на базе..." а в ней описаны принципы создания библиотеки блоков и потом спецификации. Понимаете, не атрибуты надо менять а сразу правильно составлять библиотеки. Мы делали свои еще до написания книги, т.е. по-своему. Как пример, даю файлик, сделанный на "чужой" подоснове из Архикада (ногами не бить за слои), технологической части проекта (медицинской). Вот с такого файла легко считывается инфа в 9-ти позиционную спецификацию.

Господин Алан, не хочу никого обидеть, но по-моему вы вообще не в курсе о чем идет речь в моих постах. Меня больше всего поразило "надо сразу правильно составлять библиотеки". Да что вы говорите? Вы видимо библиотеку составили с первого рази и без ошибок. Ну что ж мои Вам овации. Только вот файлик ваш, абсолютно непонятен простому человеку. Отдельно блок-рисунок. Отдельно от этого блока атрибут. Причем даже не на самом блоке, а где-то рядом висит. Наверно Вам удобно и понятно, раз вы пишете "Вот с такого файла легко считывается инфа в 9-ти позиционную спецификацию"(кст, а где сама спецификация-то). А мне кажется удобнее и понятнее мой вариант, в котором написано что за предмет, его габариты, и другие нужные для спецификации характеристики. AutoCAD, г-н Алан, это такой инстремент, в котором цель можно достич разными средствами и путями. Конечно, я понимаю ваше желание меня больше просветить в этом вопросе, но если честно ни по вашей ссылке, ни по вашему файлу, я ничего не понял.
Вот ещё один мой файл со спецификацией в финальной стадии.

[Alan]

Сообщение от rzinnurov Только вот файлик ваш, абсолютно непонятен простому человеку. Отдельно блок-рисунок. Отдельно от этого блока атрибут. Причем даже не на самом блоке, а где-то рядом висит.

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

Наверно Вам удобно и понятно, раз вы пишете "Вот с такого файла легко считывается инфа в 9-ти позиционную спецификацию"(кст, а где сама спецификация-то).

Прикладываю спецификацию, выполненную по ГОСТ 21.110

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

Да, разными средствами и путями. В Автокаде можно практически всё. Но Вы пока работаете с 10-100 блоками такие вещи еще проходят.
А в общем случае надо переходить на работу с базой.
И книжечку всё-таки посмотрите, если не всё поняли из тех сообщений на указанной мной ссылке...

[rzinnurov]

Alan теперь понятно, о чём вы говорили и вашу основную мысль я понял. Книгу "САПР на базе..." "приобрёл" и на досуге (как только свободное время появится) ознакомлюсь.

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

Offtop: Эту книгу нельзя читать "на досуге"... По крайней мере первые две трети