擦除和替换多个块

Conveyor1 · 发表于 2018-6-12 07:08:27

早上好，我正在尝试编写一些代码来查看一个块，看看它是否被不当修改，如果是，则将其删除并正确重新插入该块。目前，代码能够找到修改后的块，并且能够删除和重建它。但是，如果在绘图中找到超过1个块，我在第二遍的粗体代码行中收到错误“对象引用未设置为对象的实例”。代码：Public SubDrawing_Check（）'在测试中。
。
将我的块调暗为ArrayList=GetTopLevelBlock（）。
将myBlockName调暗为字符串。
调暗myTransMan作为DatabaseServices.TransactionManager。
调暗myTransDatabaseServices.Transaction。
调暗myDB作为DatabaseServices.Database。
将mydwg调暗为文档=ApplicationServices.Application.DocumentManager.MdiActiveDocument。
MyDB=mydwg.Database。
我的TransMan=myDB.TransactionManager。
myTrans=myTransMan.StartTransaction。
。
对于myblock中的每个myBlockName。
调暗myObjID作为DatabaseServices.ObjectIdCollection。
调暗myObjID作为DatabaseServices.ObjectId。
调暗myBlockRef作为DatabaseServices.BlockReference。
myObjIDs=PopulateOIDC（myBlockName）。
。
对于myObjID中的每个myObjID。
DatabaseServices.OpenMode.ForReadmyObjID.GetObject。
调暗mybtr作为DatabaseServices.BlockTableRecord=myBlockRef.DynamicBlockTableRecord.GetObject（OpenMode.ForRead）。
如果mybtr.Name="通用块"，则。
'检查是否旋转。
如果myBlockRef.Rotation>Math.PI/2或myBlockRef.Rotation>Math.PI*3/2那么。
'读取属性。
Temp_1为字符串=Class1_Obj.ReadAttributeValue（myObjID，"Attribute_1"）。
Temp_2为字符串=Class1_Obj.ReadAttributeValue（myObjID，"Attribute_2"）。
'读取动态。
Temp_3为字符串=Class1_Obj.ReadDynamicValue（myObjID，"Dynamic_1"）。
昏暗Insertion_Point为Point3d=myBlockRef.Position。
昏暗New_Insertion_Point为Point3d=Insertion_Point.Add（新Vector3d（Math.Cos（myBlockRef.Rotation）*Temp_3，Math.Sin（myBlockRef.Rotation）*Temp_3，0））。
。
调用RepopulatetoForm（myObjID）'记录块相关项目。
。
myBlockRef.UpgradeOpen（）'打开写块引用。
myBlockRef.Erase（True）'擦除不正确的块。
myTrans.Commit。
myTrans.Dispose。
'myTransMan.Dispose（）。
。
调用Class1_Obj.InsertConveyorBlock（）'重新绘制一个新块。
。
结束如果。
结束如果。
下一个。
下一个。
'结束交易。
myTrans.Dispose。
myTransMan.Dispose。
。
结束子请让我知道你的想法。

本帖以下内容被隐藏保护；需要你回复后，才能看到！

游客，如果您要查看本帖隐藏内容请回复

MickD · 发表于 2018-6-12 07:22:52

我只是很快地查看了您的代码，但您应该只需要重新定义您的块“定义”，所有“引用”（图中的引用）都会相应地更新，保持它们的方向等。这也可能是您出错的原因，当您更新第一个块时，旧的引用可能已经更新了（？）
刚刚注意到它们可能是动态块，所以我说的可能不相关？？

Conveyor1 · 发表于 2018-6-12 07:39:09

早上，
我以为当代码第二次出现时，“对于每个myObjID In myObjIDs”循环，这种情况正在发生。但我可能是误解了。
当我测试这一点时，我在DWG中有三个块，其中两个不正确。当代码运行时，我的myObjID中确实有（3）个objID。当它出错时，myObjID 被设置为下一个对象 ID，而不是在上一次传递中被擦除和替换的对象 ID。
是的，它们是动态块。
请让我知道你的想法。

MickD · 发表于 2018-6-13 03:12:24

说实话，我只是在快速观察，你可能正在尝试编辑每个单独的块“引用”，而不是编辑块“定义”，这将在更新时更新所有块引用（所有引用都引用一个定义，但我不清楚这如何与动态块一起工作）。
但是，我确实注意到您在发布的代码中两次处置了该交易：
myTrans.Commit（）
myTrans.Dispose（）
'myTransMan.Dispose（）

Call Class1_Obj.InsertConveyorBlock（） ' Redraws a New Block

End If
End If
Next
' End Transactions
myTrans.Dispose（）
只有在完成所有工作（即在这种情况下的循环迭代）后，才提交并释放您的事务。如果由于其他情况而必须提交，请在循环中创建一个新的嵌套事务，并确保在下一个循环之前提交和释放。