[favorite]

Возник вопрос как настроить изображение круглой поверхности сделанное из Mass в ADT ,а то у меня поверхность отображается ене круглой а угловатой.


В autocad я знаю isolines а в ADT,??????

[favorite]

Так не ужеле нет вот возможности суммарный объем подсчитать?

[favorite]

Все надоело. Кому надо берите пользуйтесь.

Код:

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

; ПРограмма рассчета Объема Элементов ADT
; автор Зурабян Давид Артемович
(defun C:MAss(/ volume Au )
  (vl-load-com)
  (setq app (vla-get-modelspace(vla-get-activedocument(vlax-get-acad-object))))
  (prompt "Выбирите объекты")
  (setq AU (ssget ))
  (setq N (sslength AU))
(setq i 0)
  (setq Volume 0)
  (while (< i n)
    (setq name1 (ssname Au i))
    (setq ENT_name1 (entget name1))
    (setq NAME (Vlax-ename->vla-object name1))
    (vlax-dump-object name)

(setq VOLUME (+ Volume (vla-get-volume name)))

 (setq i (1+ i))
    
    )
  
  (prin1(strcat (rtos Volume) "м3   - ОБЪЕМ"))
  ;(print "ОБЪЕМ:")
  (princ)
  )
    )

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

Вариант 2:

Код:

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

(defun c:vol (/ selset sum)
  (vl-load-com)
  (setq sum 0.0)
  (if (setq selset (ssget '((0 . "AEC_MASS_ELEM"))))
    (foreach item (vl-remove-if 'listp (mapcar 'cadr (ssnamex selset)))
      (setq sum (+ sum (vla-get-volume (vlax-ename->vla-object item))))
      ) ;_ end of foreach
    ) ;_ end of if
  (princ sum)
  (princ)
  ) ;_ end of defun

[favorite]

Да наверное надо в мой код добавить фильтр для Mass элементов,а то моя программа и объем Solidov суммирует в мм3. Хотя надо наверное сделать чтобы определялось Solid это или Mass и единицы переводила. Тогда можно будет суммарный объем всех тел считать.
Правда я разобрался как объем через таблицы считать.


Ну ладно это потом.

[Андрей С.]

Да можно просто создать масс-группу. Из чего угодно - из масс-элементов, из солидов или вперемешку. И посмотреть в свойствах ее объем.

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

> Андрей С. : А если их несколько, этих элементов?
> favorite : а рассказать?

[favorite]

С таблицой возникла одна проблема, делаю таблицу на бетон.

Надо чтобы графа была количество элементов " QUANTITY"*Объем
А программа на один элемент пишет. Но сумма счиатается с умножение кол-во на бетон. А как сделать чтобы этот результат был виден.???

[Андрей С.]

>kpblc
Да хоть сто тысяч! В чем проблема-то?

[Bkmz]

Сообщение от Андрей С. Да можно просто создать масс-группу. Из чего угодно - из масс-элементов, из солидов или вперемешку. И посмотреть в свойствах ее объем.

Всё гениальное просто!!!
Мой глубокий респект.
2favorite
Действительно прорбовал делать спецификацию, в графе подсчёта пишет значение по 1 типовому элементу, а в графе итого пишет сумму всех типов.
Но это всё же детали, основную то задачу уже 3-мя способами вроде решили. В чём специфика?