xref list extraction

[LSElite]

Hey all

I am trying to find a way of extracting a list of all the xref names from a drawing but so far i have had no luck. does anyone know how to achieve this?

[pbejse]

Hey all

I am trying to find a way of extracting a list of all the xref names from a drawing but so far i have had no luck. does anyone know how to achieve this?

perhaps

(defun FindXref (/ blk lst)
      (while (setq blk (tblnext "block" (not blk)))
            (if (= 4
                   (logand 4
                           (cdr (assoc 70
                                       (tblsearch
                                             "BLOCK"
                                             (setq bn (cdr (assoc 2 blk)))
                                             )
                                       )
                                )
                           )
                   )
                  (setq lst (cons bn lst))
                  )
            )
      lst
      )

[Tharwat]

Another with Vla functions .

(defun XrefList (/ lst)
  (vl-load-com)
  (vlax-for block (vla-get-blocks (vla-get-activedocument (vlax-get-acad-object)))
    (if (eq :vlax-true (vla-get-IsXref block))
      (setq lst (cons (vla-get-name block) lst))
    )
  )
  lst
)

[LSElite]

Cheers Fellas, i didnt think about approaching the problem this way i was looking for a system variable or command, does such way not existing?

[Tom Beauford]

Cheers Fellas, i didnt think about approaching the problem this way i was looking for a system variable or command, does such way not existing?

Check out the Express Tool Propulate. From the Menu Express => File tools => Update Drawing Property Data. The default will add a list of loaded Xrefs and Fonts to the Comments section of the Summary tab of Drawing Properties. You can customize it however you like. The File tools are only in the Menu not in the Ribbon in 2012.

[LSElite]

Cheers mate, ive never seen that tool before. it looks interesting but all i can seem to do with it is update my drawing from the used template. maybe im doing it wrong.
these are my steps:
PROPULATE
Update
Current

ive tried a few other combinations bit they all seem to relate specifically to the template.

[Tom Beauford]

Cheers mate, ive never seen that tool before. it looks interesting but all i can seem to do with it is update my drawing from the used template. maybe im doing it wrong.
these are my steps:
PROPULATE
Update
Current

ive tried a few other combinations bit they all seem to relate specifically to the template.

Enter _dwgprops at the command line, found in the File menu as Drawing Properties. In the dialog box that comes up on the Comments section of the Summary tab should be a list of loaded Xrefs, Fonts and Images. If not you may have to Edit the Propulate Template and run it again. In the Comments section make sure you have => @[XREFLIST] @[FONTLIST] @[IMAGELIST]
That puts the lists in the Drawing Properties when you update the current drawing. Been a while, but I thought it was in the default template. I have my self as the Author and a handful of Custom properties which are referenced with fields in all my layouts such as the number of pages so that if another page is added to the set it only has to be updated in Drawing Properties instead of on every sheet.

[LSElite]

thats pretty cool mate, i dont suppose there is a way of extracting that data into lisp?

[Tom Beauford]

Once it's been added to Drawing Properties sure:
http://forums.augi.com/showthread.ph...o-they-mix-!#3

[greg.battin]

I found the attached routine that lists XREFs both attached and overlayed and poops out a .txt file that lists the Xrefs.
Can be found here as well: http://forums.autodesk.com/t5/Visual...t/true#M292314
XrefTree.lsp
~Greg