[sofiko]

Например: у меня есть заливка, обозначающая газон, и нужно поставить блок в котором будет отражаться надпись "Газон № ...", а снизу площадь "S=.... м.кв." (картинка в приложении)
И таких заливок очень много, на каждой выставлять площадь, замучаешься. Нужен блок который считывает площадь именно заливки, к которой он подводится

[trir]

Map/Civil 3D,

[Сергей812]

Сообщение от sofiko Нужен блок который считывает площадь именно заливки, к которой он подводится

нет в акаде штатных средств, позволяющих связывать автоматически данные примитивов одним простым "тыком".

[sofiko]

Сообщение от Сергей812 нет в акаде штатных средств, позволяющих связывать автоматически данные примитивов одним простым "тыком".

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

[Сергей812]

Сообщение от sofiko Но наверняка есть что-то стороннее. В VetCad, например, есть инструмент с изменяющимся текстом, похоже, но данные выглядят не как выноска. Или может быть можно настроить динамический блок, наподобие Координатной выноски, но не знаю как настроить атрибуты, под мои нужды.

программными надстройками можно - например, типа такого.

[AlexCondor]

Выноску не встречал, а вот у Lee есть Area Label и Areas to Field. Вторая ближе к теме, но создает простой MText объект с текстовым полем.

[skkkk]

Сообщение от sofiko Конечно в Автокаде такого инструмента нет. Но наверняка есть что-то стороннее.

Что ж тогда тема делает в разделе AutoCAD, а не в Программировании хотя бы?
Вот тут у koMon'a решение есть, я чуть-чуть только подпилил:

Код:

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

 (defun C:TEST ( / entlist en_htch pt area current_mleader_dxf_list current_mleader_block_attributes_list )
	(setq entlist (entsel "\nУкажите штриховку: "))
	(setq en_htch (car entlist))
	(setq pt (cadr entlist))
	(setq area (rtos (vla-get-Area (vlax-ename->vla-object en_htch)) 2 2))
	(vl-cmdf "_mleader" "_O" "_C" "_B" "1" "_X" pt pause)
	(setq current_mleader_dxf_list (entget (entlast)))
	(if (not (zerop (cdr (assoc 296 current_mleader_dxf_list))))
		(setq current_mleader_block_attributes_list 
			(mapcar 'cdr
				(vl-remove-if-not 
				   '(lambda (every_list_member)
						(and
							(= 302 (car every_list_member))
							(= "S-" (cdr every_list_member))
						)
					)
					current_mleader_dxf_list
				)
			)
		)
	)
	(foreach attribute_value current_mleader_block_attributes_list
		(entmod 
			(setq current_mleader_dxf_list 
				(subst (cons 302 (strcat attribute_value area " кв.м")) (cons 302 attribute_value) current_mleader_dxf_list)
			)
		)
	)
)

Обработок ошибок и проверок не делал. Чуть что пойдет не по сценарию, например, выберется не штриховка или вообще ничего не выберется, программа вылетит с ошибкой, но без последствий (системные переменные не меняются). Блок создал "на коленке" по образцу из стартового поста, хотя мне и очень не нравится, что текст выходит за границы выноски, но думаю, это было показано просто для примера - блок предлагается допилить под собственные нужны самостоятельно в редакторе блоков: установить нужный размер круга, высоту атрибутов и проч. Файл с блоком и гифку с демонстрацией работы программы прилагаю.

----- добавлено через ~26 мин. -----
Да, забыл уточнить: код реагирует на имя блока "1" и на текст атрибута "S-" - добавляет к нему значение площади и "кв.м", т.е., изменяться будет атрибут, который изначально в блоке-заготовке имеет значение "S-". Тэг атрибута роли не играет. Для другого блока его имя нужно вписать внутри кавычек вместо единицы в этой строке (в 6-ой):

Код:

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

(vl-cmdf "_mleader" "_O" "_C" "_B" "1" "_X" pt pause)

.

[Theodor]

Есть еще костыльный способ без программирования. Создать заранее пару: заливка + мультивыноска с настроенными полями. И каждый новый газон создавать не новой штриховкой, а делать копию "пары" и допиливать штриховку под нужную форму.

[Linkshunter]

Сообщение от Theodor а делать копию "пары" и допиливать штриховку под нужную форму.

солидарен,пользуюсь достаточно давно этим. Причем копировать можно по две и более пары объектов одновременно, причем любой тип объектов и любое свойство. В итоге все действия сводятся к
1) создал пару(несколько); 2) раскопировал нужное количество пар 3) с помощью повтора HATCHSETBOUNDARY задал штриховкам нужные контуры; 4) поправил положение выноски.
P/S с учетом применения формул внутри выноски сфера применения значительно расширяется.