[Marina]

Добрый день!

Столкнулась с такой задачей - есть полилиния с различными значениями ширины (width) в начале и конце. С помощью этой полилинии изображается скажем кованое изделие. И нужно получить контур этой полилинии, то есть заливку (закрашивание) удалить или скрыть, оставить только непосредственно границы (контур).

Скажите, пожалуйста, есть ли какой-нибудь способ этого добиться, скажем используя Express, Toolpac или может даже стандартный акад.

заранее спасибо

[Хмурый]

Переменную FILLMODE в 0 и регенерировать чертеж.

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

Если надо просто снести ширину, можно использовать нечто типа:

Код:

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

(defun c:w0 (/ adoc selset)
  (vl-load-com)
  (vla-startundomark
    (setq adoc (vla-get-activedocument (vlax-get-acad-object)))
    ) ;_ end of vla-StartUndoMark
  (if (setq selset (ssget "_:L" '((0 . "*POLYLINE"))))
    (foreach item (mapcar 'vlax-ename->vla-object
                          (vl-remove-if 'listp (mapcar 'cadr (ssnamex selset)))
                          ) ;_ end of mapcar
      (if (vlax-property-available-p item 'constantwidth t)
        (vl-catch-all-apply '(lambda () (vla-put-constantwidth item 0.)))
        ) ;_ end of if
      ) ;_ end of foreach
    ) ;_ end of if
  (vla-endundomark adoc)
  (princ)
  ) ;_ end of defun

Можно также попробовать flatten либо overkill из ExpressTools, к примеру...

[Кочетков Андрей]

Toolpac
Команда PWO

[Marina]

Спасибо большое

fillmode в 0 помогает только для прямолинейных сегментов, в случае дуговых - остаются полоски, да и работать с контуром тут нельзя

а вот Toolpac команда pwo позволяет получить именно контур, который потом можно редактировать (правда только при шибко большом желании - точек там тьма получается)

[skifff]

Сообщение от Marina Спасибо большое fillmode в 0 помогает только для прямолинейных сегментов, в случае дуговых - остаются полоски, да и работать с контуром тут нельзя а вот Toolpac команда pwo позволяет получить именно контур, который потом можно редактировать (правда только при шибко большом желании - точек там тьма получается)

где ? Toolpac ? взять ? а потом pwo