Search entire drawing for block references at once

[Coolmo]

Do I have to search Model Space and search Paper Space seperately in order to find a block reference in the current drawing or is there a way to search both objects (model space/paper space) at the same time? Right now I use "for each ObjectID in ...BlockTableRecord.ModelSpace...." and it works good but I then need to do the exact same code for Paperspace. Is there a better, easier way?

Thanks in advance

[dgorsman]

Short of selection sets, I don't think so. But it shouldn't be too bad with some short-circuit logic to control how far down into the testing each loop goes.

[BlackBox]

You could always use LISP to set a global variable, and call your .NET command method passing the variable.

(defun c:FOO ()
  (if (setq *ss* (ssget "_x" '((0 . "INSERT") (2 . "BlockName"))))
    (progn
      (if (not YourDotNetCommand)
        (command "._netload" "FilePath\\YourDotNetCommand"))
      (YourDotNetCommand *ss*)))
  (princ))

Hope this helps!

[Jeff H]

You can use the block's BlockTableRecord.GetBlockReferenceIds method which will return an ObjectIdCollection of the BlockReferences ObjectIds

Here is simple example getting all of the blockreferences of a block named "C" and printing to the command line if it is in Model or paper.

        <CommandMethod("GetBlockRefs")> _
        Public Sub GetBlockRefs()

            Dim doc As Document = Application.DocumentManager.MdiActiveDocument
            Dim db As Database = doc.Database
            Dim ed As Editor = doc.Editor

            Using trx As Transaction = db.TransactionManager.StartTransaction()

                Dim bt As BlockTable = db.BlockTableId.GetObject(OpenMode.ForRead)
                Dim btr As BlockTableRecord = bt("C").GetObject(OpenMode.ForRead)
                Dim objIds As ObjectIdCollection = btr.GetBlockReferenceIds(True, False)

                For Each objId As ObjectId In objIds

                    Dim ent As Entity = objId.GetObject(OpenMode.ForRead)
                    Dim btrOwner As BlockTableRecord = ent.BlockId.GetObject(OpenMode.ForRead)
                    ed.WriteMessage(vbCrLf & btrOwner.Name)

                Next

                trx.Commit()

            End Using

        End Sub

[Jeff H]

Who is "christopher.259266" where did that name come from?

[Coolmo]

Who is "christopher.259266" where did that name come from?

nice plug BTW ...and more importantly, thanks for the code. I haven't tried it yet but it appears as if it grabs any certain block reference named "C" regardless of its space.. right? Can I assume that once you "have it" you can manipulate its dynamic and attribute properties once "obtained"?

[Jeff H]

nice plug BTW ...and more importantly, thanks for the code. I haven't tried it yet but it appears as if it grabs any certain block reference named "C" regardless of its space.. right? Can I assume that once you "have it" you can manipulate its dynamic and attribute properties once "obtained"?

They switched a bunch of people's usernames. I have no idea.

but it appears as if it grabs any certain block reference named "C" regardless of its space.. right?

Yes grabs all blockreferences created from block definition.

Can I assume that once you "have it" you can manipulate its dynamic and attribute properties once "obtained"?

Yes/No
If it is a dynamic block and you change any of the dynamic properties it will create a anonymous block.
Then you must use GetAnonymousBlockIds instead of GetBlockReferenceIds in code above or maybe need to use both.

[BlackBox]

Who is "christopher.259266" where did that name come from?

This may help to clarify:

• Forum announcement regarding Inadvertent forum user name changes

[Jeff H]

Thanks,
As you can see still have not fixed it

[Kerry Brown]

Thanks,
As you can see still have not fixed it

If ability was boolean property the options would be competent and AuGi