[Djeker]

Как разделить или разрезать штриховку по полилинии?
Не обрезать стандартной командой, что потом исчезает кусок, а именно поделить / разрезать , чтобы сохранить обе части штриховки

Вот к примеру есть жёлтая штриховка и полилиния. (сверху на рисунке)
Какую команду набрать или какой лисп запустить , чтобы последовательно выбрать штриховку, затем полилинию, нажать Ентер и штриховка поделилась на 2 части?

[Bull]

штатно никак

[Djeker]

Сообщение от Bull штатно никак

Может у кого лисп есть...
Обрезать , потом опять штриховать проблемно с большим количеством =(

[Profan]

Запомни штриховку. Сотри ее. Начерти разделительную полилинию. Заново создай штриховку в получившихся областях.

[Bull]

Offtop:

Сообщение от Profan Запомни штриховку. Сотри ее. Начерти разделительную полилинию. Заново создай штриховку в получившихся областях.

точно программист...

----- добавлено через ~1 мин. -----

Сообщение от Djeker Может у кого лисп есть...

вам тоже в ветку "программирование" (только что одного направляли по другому вопросу)

[Profan]

Да с лиспом вряд ли намного быстрее будет. Все равно тыкать...

[kp+]

Сообщение от Djeker Может у кого лисп есть...

Тут есть
https://lispbox.wordpress.com/2015/02/01/hatch-split/
но как-то через одно место написано, у меня сходу не пошел. попробуй, конечно, разобраться

[zenon]

скопировать штриховку на саму себя (дабы получилось 2), с помощью команды _trim обрезать.

[mindchamber]

Сообщение от zenon скопировать штриховку на саму себя (дабы получилось 2), с помощью команды _trim обрезать.

Или создать 2 полилинии и обрезать между ними штриховку.

[Djeker]

Если у кого-нибудь есть выход на разработчиков, то сообщите им о предложении сделать возможность деления штриховки полилинией.
Штриховка нужный инструмент , а по возможности её делить/объединять как-то дискриминируют.

Лет 5 назад довелось бывать на конференции автодеска в мск, там давали слово представителю сообщества пользователей в России, может с ним кто имеет связь)

[trir]

ST_Difference

[mindchamber]

Сообщение от kp+ Тут есть https://lispbox.wordpress.com/2015/02/01/hatch-split/ но как-то через одно место написано, у меня сходу не пошел. попробуй, конечно, разобраться

Подниму тему. Почему-то не работает данный lisp. Я так понял он разрезает все штриховки по выбранной полилинии? Есть ли его рабочая версия? Поделитесь пожалуйста.

[mihael_b]

https://areatester.com/

[mindchamber]

Сообщение от mihael_b https://areatester.com/

Не совсем то. Ладно, будем по старинке через _trim

[Oleg T]

Если кому интересно, в приложенном файле некий алгоритм с использованием стандартных средств.
(в автокаде не проверял, сделано в аналоге - брикскад)
ЗЫ
Нет, в Автокаде не работает

[VitalyAF]

Разделить или разрезать штриховку полилинией

Для чего????? В 99%-ах это изобретение велосипеда...!
Если это условная линия реза, например оч. длинная деталь, то есть
стандартные линии с маскировкой части изображения и штриховки в т.ч.!
К тому же можно кастомную создать, за узлы тянуть, подгоняя под деталь...

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

VitalyAF, в чистом ACAD никаких "стандартных линий с маскировкой" нет, насколько мне известно.

[VitalyAF]

Сообщение от Кулик Алексей aka kpblc VitalyAF, в чистом ACAD никаких "стандартных линий с маскировкой" нет, насколько мне известно.

Там дело не в линии а в определённом цвете полигона... 160-ый, если память не изменяет...
не думаю, что для этого вертикалка нужна...
...впрочем мне пофиг, пусть режет штриховку, говорят через руки быстрее доходит...
...а я уже давно переобулся на Fusion 360..., мелкой моторикой уже не занимаюсь))

PS
...вспомнил, я последний раз делал такой разрез в конторе архитектурной, к-рая исключительно
в голом акаде рукоделием занималась... Это те, к-рые 11-ть листов весь день распечатывают,
и потом не разговаривают друг с другом, из-за споров на топорах - у кого версия проекта актуальней...
Лет 5-7 т.н. это было, может и более...))
Так что ищите и обрящете!

[mindchamber]

Сообщение от VitalyAF Для чего????? В 99%-ах это изобретение велосипеда...! Если это условная линия реза, например оч. длинная деталь, то есть стандартные линии с маскировкой части изображения и штриховки в т.ч.! К тому же можно кастомную создать, за узлы тянуть, подгоняя под деталь...

Например на генплане участок разделен на много участков, а штриховка озеленения и дорог одна, а экспертиза просит площади в технико-экономических показателях на каждый участок отдельно. Поэтому очень бы пригодился инструмент по разрезу штриховки полилиниями.

[VitalyAF]

...а штриховка озеленения и дорог одна...

автора на выход, с вещами...! Пусть в зад вертает штриховку и делает как надо!

[koMon]

Сообщение от mindchamber Почему-то не работает данный lisp.

прикольная идея резать штриховку через объёмное преобразование с последующим отпечатком (imprint) режущей кривой. я написал лисп по мотивам ссылки. всяческих проверок нет. получаемые на выходе порезки штриховки штрихуют регионы, которые затем удаляются.

Код:

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

 
*****************************************************************************************************************************************

(vl-load-com) 			;unless Boxa did not shorten the participants list

;*****************************************************************************************************************************************

(defun c:split_hatch (/
						hatch_to_split
						sample_hatch
						hatch_splitter
						hatch_plane
						splitted_parts_variant
						summary_region
						splitted_hatch_index
					 )

;	*************************************************************************************************************

	(defun add_hatch (object_to_hatch sample_hatch / hatch_object)
		(vl-cmdf "_-hatch" "_p" (vla-get-patternname sample_hatch)
								(vla-get-patternscale sample_hatch)
								(vla-get-patternangle sample_hatch)
						   "_s" (vlax-vla-object->ename object_to_hatch)
						   	"" ""
		)
	    (setq hatch_object (vlax-ename->vla-object (entlast)))
		(foreach property '(
								BackgroundColor Elevation EntityTransparency GradientAngle GradientCentered
								GradientColor1 GradientColor2 GradientName HatchObjectType HatchStyle ISOPenWidth
								Layer Linetype LinetypeScale Lineweight Material Normal Origin PatternDouble
								PatternSpace PlotStyleName TrueColor Visible
						   )
			(vl-catch-all-apply (read (strcat "vla-put-" (vl-symbol-name property)))
								(list hatch_object
									  (vl-catch-all-apply (read (strcat "vla-get-" (vl-symbol-name property)))
														  (list sample_hatch)
									  )
								)
			)
		)
		(vla-put-associativehatch hatch_object :vlax-false)
	)

;	*************************************************************************************************************

	(vla-startundomark (vla-get-activedocument (vlax-get-acad-object)))
	(redraw (setq hatch_to_split (car (entsel "\nВыберите штриховку для разделения: "))) 3)
	(setq sample_hatch (vla-copy (vlax-ename->vla-object hatch_to_split))
		  hatch_splitter (car (entsel "\nВыберите делящий примитив: "))
		  splitted_hatch_index 0
	)
	(setvar 'cmdecho 0)
	(vl-cmdf "._hatchedit" hatch_to_split "_b" "_r" "_y")
	(vl-cmdf "._planesurf" "_o" (entlast) "")
	(setq hatch_plane (entlast))
	(vla-erase (vlax-ename->vla-object hatch_to_split))
	(vl-cmdf "._imprint" hatch_plane hatch_splitter "_n" "")
	(vl-cmdf "._explode" hatch_plane)
	(setq splitted_parts_variant (vla-explode (vlax-ename->vla-object (setq summary_region (entlast)))))
	(vla-erase (vlax-ename->vla-object summary_region))
	(foreach _region (vlax-safearray->list (vlax-variant-value splitted_parts_variant))
		(add_hatch _region sample_hatch)
		(vla-erase _region)
		(setq splitted_hatch_index (1+ splitted_hatch_index))
	)
	(vla-erase sample_hatch)
	(princ (strcat "\nИз выбранной штриховки получено частей: " (itoa splitted_hatch_index)))
	(vla-endundomark (vla-get-activedocument (vlax-get-acad-object)))
	(setvar 'cmdecho 1)
	(princ)
)

;*****************************************************************************************************************************************

[mindchamber]

Сообщение от koMon прикольная идея резать штриховку через объёмное преобразование с последующим отпечатком (imprint) режущей кривой. я написал лисп по мотивам ссылки. всяческих проверок нет. получаемые на выходе порезки штриховки штрихуют регионы, которые затем удаляются.

Спасибо, то что надо!

Offtop: Если бы можно было выбрать сразу несколько штриховок и полилиний, то было бы идеально , сори за наглость)

[trir]

Например на генплане участок разделен на много участков, а штриховка озеленения и дорог одна, а экспертиза просит площади в технико-экономических показателях на каждый участок отдельно. Поэтому очень бы пригодился инструмент по разрезу штриховки полилиниями.

Если бы можно было выбрать сразу несколько штриховок и полилиний, то было бы идеально

SQL!

[koMon]

Сообщение от mindchamber сразу несколько штриховок и полилиний

попарно/комплектами?

[mindchamber]

Сообщение от koMon попарно/комплектами?

Было бы удобно так:
split_hatch
ENTER
Выбор штриховок (хорошо если бы можно было использовать инструмент лассо)
ENTER
Выбор полилиний (тоже хорошо было бы использовать лассо)
ENTER

[trir]

Было бы удобно так: split_hatch ENTER Выбор штриховок (хорошо если бы можно было использовать инструмент лассо) ENTER Выбор полилиний (тоже хорошо было бы использовать лассо) ENTER

Легко!

Код:

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

select p.id, p.geom.STDifference(l.geom) as geom1, p.geom.STIntersection(l.geom) as geom2
from Леса as l, Участки as p

[koMon]

mindchamber, хорошо бы картинку посмотреть

[mindchamber]

Сообщение от koMon mindchamber, хорошо бы картинку посмотреть

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

[tusiko]

Сообщение от mindchamber Или создать 2 полилинии и обрезать между ними штриховку

спасибо за решение. Только после разделения надо в редактировании штриховки поставить галочку "separate hatches", что бы штриховки были самостоятельными, иначе она остается единой.