• Sasha
  • Восстановленный участник
  • На форуме с 25 мая 2004г.
  • Сообщений: 2
  • Спасибо: 0

Тема: Как список X-ref автоматически всталять в чертёж?

Господа!
Есть ли в AutoCAD инструмент,  или Lisp посредством которого можно получить список  X-ref и
автоматически всталять в чёртеж (в виде block ?)
Спасибо !

  • На форуме с 23 апреля 2003г.
  • Сообщений: 795
  • Спасибо: 0

Re: Как список X-ref автоматически всталять в чертёж?

Когда-то писал.Но практически не использовал.
Превращает все вставленные в рисунок ссылки в блоки.

(defun C:xref-ins()
  (vl-load-com)
  (if
    (setq nb(ssget "x" '((0 . "insert"))))
    (progn
      (setq nb (mapcar 'vlax-ename->vla-object
         (vl-remove-if 'listp
         (mapcar 'cadr (ssnamex nb)
             )
         )
               )
        );setq
  (foreach item nb
  (if (vlax-property-available-p item "path")
    (command "_xref" "_b" (vla-get-name item))
    );if
    );foreach
      );progn
    );if
  (princ)
  )

  • subchik
  • Восстановленный участник
  • На форуме с 4 июня 2001г.
  • Сообщений: 872
  • Спасибо: 0

Re: Как список X-ref автоматически всталять в чертёж?

> Sasha
А еще в Express tools есть команда RTEXT, которая при вставке DIESEL-выражения $(xrefs [, flags [, leader [, trailer]]]) выдает список внешних ссылок. К тому же они динамические (если что-то поменялось, список тоже поменяется). Это будет не блок, но один единый примитив. См Help к Экспрессам.

  • Sasha
  • Восстановленный участник
  • На форуме с 25 мая 2004г.
  • Сообщений: 2
  • Спасибо: 0

Re: Как список X-ref автоматически всталять в чертёж?

Андрей С.  , Спасибо !

  • VADIK
  • Восстановленный участник
  • На форуме с 8 ноября 2003г.
  • Сообщений: 186
  • Спасибо: 0

Re: Как список X-ref автоматически всталять в чертёж?

> Андрей С.
есть ещё одна проблемка нужен список xRef-файлов которые находяться только на первом уровне xRef-разветвления.

  • subchik
  • Восстановленный участник
  • На форуме с 4 июня 2001г.
  • Сообщений: 872
  • Спасибо: 0

Re: Как список X-ref автоматически всталять в чертёж?

> VADIK
Попробуй использовать флаг 16. Названия вложенных ссылок будут со сдвигом вправо.
Например, $(xrefs,17)