[Supermax]

У 3D солидов можно раскрашивать грани разным цветом. Я выбрал цвет, закрасил одну грань, а другую забыл. А цвет-то был сложный с яркостью, вот и думаю, а как узнать цвет грани? Как ткнуть в грань и запомнить этот цвет, а потом им другие грани покрасить?
Нужна программная "пипетка". Может на ARX можно это сделать?
Кто поможет?

[gomer]

может и на лисп)))

Код:

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

(defun c:dropcolor ( / en0 en1 *error*)
  (defun *error* ( msg ) (princ))
  (vl-load-com)
  (if (setq en0 (car (entsel "\nВыберите с необходимым цветом: ")))
    (progn 
      (while (setq en1 (car (entsel "\nВыберите объект для закраски: ")))
        (vla-put-Color
          (vlax-ename->vla-object en1)
          (vla-get-Color (vlax-ename->vla-object en0)))
      )
    )
    (princ "\nНеобходимо выбрать объект!")
  )
  (princ)
)

[Supermax]

На лиспе я могу 3D солид весь разбарохолить и узнать цвета всех граней, но как узнать какую грань мне надо - не представляю. Это же надо в грань ткнуть и ее описание получить. Не знаю, не знаю. На лиспе может и не получиться.
А шутка ... так себе.

[gomer]

у меня получилось закрасить один раз часть 3D Солида... дальше грани и кромки не выбираются отдельно ac2008
Не знаю куда пошел прогресс... по логике должно работать... а там хз

[Supermax]

Ты выбираешь весь солид и его весь красишь.
У меня была мысль, покрасить одну грань в черный, затем списать все цвета граней и покрасить ту же грань в белый, опять прочесть цвета и там где цвет сменился с черного на белый и есть моя грань, затем два раза откатится назад и востановить прежние цвета граней, НО!
Сделать это можно только через команду
_solidedit затем выбрать _face и набить в комстроку координаты точки на плоскости, затем _color а дальше выскакивает палитра и с командной строки задать цвет-увы никак. Тупик.

Кажется нашел решение. Там есть присвоение материала. Создаем программно материал "ПРОБА" любого содержания и выбрав грань присваеваем этот материал этой грани, затем ищем в описании солида грань с таким материалом и находим. Смотрим цвет и радуемся жизни. Материал откатываем назад.

[VVA]

Supermax, Я дешифровывать солид не умею, но посмотри что возвращает nentsel. Эта функция предназначена для работы с комплексными объектами.

Код:

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

(entget(car(nentsel)))

[Supermax]

http://dwg.ru/dnl/99
могу и подробнее

nentsel ничего не дает