CreateExtensionDictionary to blockreference

Anonymous — Mon, 25 Sep 2006 19:54:36 GMT

I'm trying to create an extension dictionary for a blockreference but autocad tall me eNoDatabase

here is the code

Dim db As Database = HostApplicationServices.WorkingDatabase
Dim trans As Transaction = db.TransactionManager.StartTransaction()
Dim bt As BlockTable = trans.GetObject(db.BlockTableId, OpenMode.ForWrite)
Dim btr As BlockTableRecord = trans.GetObject(bt.Item(BlockTableRecord.ModelSpace), OpenMode.ForWrite)
Dim newBtrId As ObjectId = CreateEmployeeDefinition()
Dim br As BlockReference = New BlockReference(New Point3d(10, 10, 0), newBtrId)
Dim brExtDict As DBDictionary

Dim name As Xrecord = New Xrecord
Dim salary As Xrecord = New Xrecord
Dim division As Xrecord = New Xrecord

name.Data = New ResultBuffer(New TypedValue(DxfCode.Text, "Earnest Shackleton"))
salary.Data = New ResultBuffer(New TypedValue(DxfCode.Real, 7200))
division.Data = New ResultBuffer(New TypedValue(DxfCode.Text, "Sales"))

' Se cae al tratar de crear el diccionario para el blockreference

br.CreateExtensionDictionary()

the last line is where crash the code,
any help it's good recived

Re: CreateExtensionDictionary to blockreference

Anonymous — Mon, 25 Sep 2006 22:04:06 GMT

I've not tested but think that you must add br to btr before br.CreateExtensionDictionary()

Re: CreateExtensionDictionary to blockreference

Anonymous — Tue, 26 Sep 2006 13:32:34 GMT

Thanks a lot i thonk the same during the night 🙂

topic CreateExtensionDictionary to blockreference in .NET Forum

CreateExtensionDictionary to blockreference

Re: CreateExtensionDictionary to blockreference

Re: CreateExtensionDictionary to blockreference