[实体对象] 标注尺寸后面增加文字

萧闫子

1. 
   
2. Document doc = Application.DocumentManager.MdiActiveDocument;
   
3.             Database db = doc.Database;
   
4.             Editor ed = doc.Editor;
   
5.             var resSel =ed.GetSelection(new SelectionFilter(
   
6.                         new TypedValue[]
   
7.                         {
   
8.                             new TypedValue(0, "DIMENSION")
   
9.                         }));
   
10.             if (resSel.Status != PromptStatus.OK)
    
11.                 return;
    
12. using (Transaction tr = db.TransactionManager.StartTransaction())
    
13. {
    
14. foreach (ObjectId id in resSel.Value.GetObjectIds())
    
15. {
    
16. var dim = tr.GetObject(id, OpenMode.ForWrite) as Dimension;
    
17. dim.DimensionText = "<>(Str)";
    
18. }
    
19. tr.Commit();
    
20. }
    

复制代码