[Творцуха]

Добрый день, интересует есть ли возможность быстрого подсчета количества вершин полилинии ( в моем случае углов), не нашел ничего по этому вопросу, команда _list нужных данных не содержит

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

Как вариант: вызвать свойства для выделенной полилинии и там найти строку "Вершина номер".

[Творцуха]

гениально!
спасибо)

[skkkk]

А если (гипотетически) пользователь взял и соединил ручками две вершины полилинии? Тогда в свойствах вершин будет больше, чем углов.
Для надежности я бы прежде обработал полилинию командой PL-VxOpt из набора PL-Tools.
А потом уже либо через свойства, либо использовать простенький лисп:

Код:

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

 (defun C:TEST ( / en)
	(while (null en) 
		(setq en (car (entsel "\nВыберите полилинию: ")))
		(if (and en (not (wcmatch (cdr (assoc 0 (entget en))) "*POLYLINE")))
			(progn 
				(princ "\Это не полилиния")
				(setq en nil)
			)
		)
	)
	(princ (strcat "\nКоличество вершин: " (vl-princ-to-string (fix (vlax-curve-getEndParam (vlax-ename->vla-object en))))))
	(princ)
)

Он выведет количество вершин указанной полилинии в командную строку.

[twilight]

Взорвать и посмотреть количество отрезков.

[VVA]

Экспортировать координаты в Excell и там посмотреть количесвто

[Valery Brelovsky]

Сообщение от skkkk Тогда в свойствах вершин будет больше, чем углов.

Вершин, в полилинии, всегда больше чем углов поворота, так как начало и конец полилинии не имеют вершин.