topic Re: true name of dynamic block? in .NET Forum

true name of dynamic block?

Anonymous — Thu, 22 Jun 2006 08:54:50 GMT

I want to use the blockname of a given id. With normal blocks it works fine, but dynamic blocks return an anonymous name like *Uxxx. How can i find the true name of the dynamic block?
Dim Btr As BlockTableRecord = CType(ta.GetObject(curBlockRef.BlockTableRecord.ConvertToRedirectedId, OpenMode.ForRead, False), BlockTableRecord)
Dim ProductNo As String = Btr.Name

Re: true name of dynamic block?

Anonymous — Thu, 22 Jun 2006 11:02:40 GMT

EffectiveName property?

wrote in message news:5214891@discussion.autodesk.com...
I want to use the blockname of a given id. With normal blocks it works fine,
but dynamic blocks return an anonymous name like *Uxxx. How can i find the
true name of the dynamic block?
Dim Btr As BlockTableRecord =
CType(ta.GetObject(curBlockRef.BlockTableRecord.ConvertToRedirectedId,
OpenMode.ForRead, False), BlockTableRecord)
Dim ProductNo As String = Btr.Name

Re: true name of dynamic block?

Anonymous — Thu, 22 Jun 2006 12:50:36 GMT

Thanks, but EffectiveName works in VBA only.

Re: true name of dynamic block?

Anonymous — Thu, 22 Jun 2006 19:04:34 GMT

If the IsDynamicBlock property of the BlockReference returns
true, then you use the DynamicBlockTableRecord property to
get the id of the BlockTableRecord, open that and get its name.

--
http://www.caddzone.com

AcadXTabs: MDI Document Tabs for AutoCAD 2004/2005/2006/2007
http://www.acadxtabs.com

wrote in message news:5214891@discussion.autodesk.com...
I want to use the blockname of a given id. With normal blocks it works fine, but dynamic blocks return an anonymous name like *Uxxx. How can i find the true name of the dynamic block?
Dim Btr As BlockTableRecord = CType(ta.GetObject(curBlockRef.BlockTableRecord.ConvertToRedirectedId, OpenMode.ForRead, False), BlockTableRecord)
Dim ProductNo As String = Btr.Name

Re: true name of dynamic block?

Anonymous — Sun, 25 Jun 2006 10:32:08 GMT

Thanks a lot Tony, it works!

I have a little problem with the property IsDynamicBlock, because it sometimes was false though it was a dynamic block, so i use the anonymous blockname.
For other users i complete my code:

Dim Btr As BlockTableRecord = CType(ta.GetObject(curBlockRef.BlockTableRecord.ConvertToRedirectedId, OpenMode.ForRead, False), BlockTableRecord)
Dim ProductNo As String
If Left(Btr.Name, 1) = "*U" Then
Dim dynObjectID As ObjectId = curBlockRef.DynamicBlockTableRecord
ProductNo = Left(Btr.Name, Len(Btr.Name) - 1)
Dim dynBtr As BlockTableRecord = CType(ta.GetObject(dynObjectID, OpenMode.ForRead, False), BlockTableRecord)
ProductNo = dynBtr.Name
Else
ProductNo = Btr.Name
End If