Wblock问题

sealive

用选择集选择了一些对象，并获得了id集，使用database.wblock（idcollection，basepiont）方法创建一个database，如何让选择对象在新的database里的插入点是坐标原点，假定已经知道了选择对象的范围的minpoint。

雪山飞狐_lzh

第二个参数应该就是吧

sealive

试过了，改变参数没反应！

偶尔做做怪

我也有个问题，database.wblock 能否将图形添加到已存在的图形中？

偶尔做做怪

basepiont 我设置为 new point3d（100,100,0）与设置为db.Ucsorg效果一样。

雪山飞狐_lzh

可以用事件处理吧 写块在 db有对应的事件

偶尔做做怪

能稍微具体点吗？

qq1254582201

2. [CommandMethod("MyWBlock", CommandFlags.Modal)]
   
3.         public static void ExecuteViewSetting()
   
4.         {
   
5.             Document doc = Application.DocumentManager.MdiActiveDocument;
   
6.             Database db = doc.Database;
   
7.             Editor ed = doc.Editor;
   
8.             PromptSelectionResult prRes = ed.GetSelection();
   
9.             if (prRes.Status != PromptStatus.OK) return;
   
10.             ObjectIdCollection objIds = new ObjectIdCollection();
    
11.             ObjectId[] objIdArray = prRes.Value.GetObjectIds();
    
12.             double dMinX = 0, dMinY = 0, dMaxX = 0, dMaxY = 0;
    
13.             /// Copy objectIds to objectIdCollection
    
14.             foreach (ObjectId id in objIdArray)
    
15.             {
    
16.                 using (Transaction txn = id.Database.TransactionManager.StartTransaction())
    
17.                 {
    
18.                     Entity acEnt = txn.GetObject(id, OpenMode.ForRead) as Entity;
    
19.                     if (null != acEnt)
    
20.                     {
    
21.                         try
    
22.                         {
    
23.                             if ((dMinX == 0) && (dMinY == 0) && (dMaxX == 0) && (dMaxY == 0))
    
24.                             {
    
25.                                 dMinX = acEnt.GeometricExtents.MinPoint.X;
    
26.                                 dMinY = acEnt.GeometricExtents.MinPoint.Y;
    
27.                                 dMaxX = acEnt.GeometricExtents.MaxPoint.X;
    
28.                                 dMaxY = acEnt.GeometricExtents.MaxPoint.Y;
    
29.                             }
    
30.                             else
    
31.                             {
    
32.                                 if (dMinX > acEnt.GeometricExtents.MinPoint.X) dMinX = acEnt.GeometricExtents.MinPoint.X;
    
33.                                 if (dMinY > acEnt.GeometricExtents.MinPoint.Y) dMinY = acEnt.GeometricExtents.MinPoint.Y;
    
34.                                 if (dMaxX < acEnt.GeometricExtents.MaxPoint.X) dMaxX = acEnt.GeometricExtents.MaxPoint.X;
    
35.                                 if (dMaxY < acEnt.GeometricExtents.MaxPoint.Y) dMaxY = acEnt.GeometricExtents.MaxPoint.Y;
    
36.                             }
    
37.                         }
    
38.                         catch { }
    
39.                     }
    
40.                     txn.Commit();
    
41.                 }
    
42.                 objIds.Add(id);
    
43.             }
    
44.             using (Database acDatabase = new Database(true, false))
    
45.             {
    
46.                 db.Wblock(acDatabase, objIds, Point3d.Origin, DuplicateRecordCloning.Ignore);
    
47.                 ///translate to (0,0,0)
    
48.                 using (Transaction txn = acDatabase.TransactionManager.StartTransaction())
    
49.                 {
    
50.                     Matrix3d mat = Matrix3d.Displacement(new Point3d((dMinX + dMaxX) * 0.5, (dMinY + dMaxY) * 0.5, 0).GetVectorTo(Point3d.Origin));
    
51.                     BlockTable acBlkTbl = (BlockTable)txn.GetObject(acDatabase.BlockTableId, OpenMode.ForRead);
    
52.                     BlockTableRecord acBlkTblRcd = (BlockTableRecord)txn.GetObject(acBlkTbl[BlockTableRecord.ModelSpace], OpenMode.ForWrite);
    
53.                     foreach (ObjectId objId in acBlkTblRcd)
    
54.                     {
    
55.                         Entity acEnt = txn.GetObject(objId, OpenMode.ForWrite) as Entity;
    
56.                         if (null != acEnt)
    
57.                         {
    
58.                             acEnt.TransformBy(mat);
    
59.                         }
    
60.                     }
    
61.                     ed.ZoomExtens();
    
62.                     txn.Commit();
    
63.                 }
    
64.                 ///up to here
    
65.                 string FileName = "C:\\temp\\wblock.dwg";
    
66.                 acDatabase.SaveAs(FileName, DwgVersion.Current);
    
67.             }
    
68.         }

[CommandMethod("MyWBlock", CommandFlags.Modal)]<br />         public static void ExecuteViewSetting()<br />         {<br />             Document doc = Application.DocumentManager.MdiActiveDocument;<br />             Database db = doc.Database;<br />             Editor ed = doc.Editor;<br />             PromptSelectionResult prRes = ed.GetSelection();<br />             if (prRes.Status != PromptStatus.OK) return;<br />             ObjectIdCollection objIds = new ObjectIdCollection();<br />             ObjectId[] objIdArray = prRes.Value.GetObjectIds();<br />             double dMinX = 0, dMinY = 0, dMaxX = 0, dMaxY = 0;<br />             /// Copy objectIds to objectIdCollection<br />             foreach (ObjectId id in objIdArray)<br />             {<br />                 using (Transaction txn = id.Database.TransactionManager.StartTransaction())<br />                 {<br />                     Entity acEnt = txn.GetObject(id, OpenMode.ForRead) as Entity;<br />                     if (null != acEnt)<br />                     {<br />                         try<br />                         {<br />                             if ((dMinX == 0) && (dMinY == 0) && (dMaxX == 0) && (dMaxY == 0))<br />                             {<br />                                 dMinX = acEnt.GeometricExtents.MinPoint.X;<br />                                 dMinY = acEnt.GeometricExtents.MinPoint.Y;<br />                                 dMaxX = acEnt.GeometricExtents.MaxPoint.X;<br />                                 dMaxY = acEnt.GeometricExtents.MaxPoint.Y;<br />                             }<br />                             else<br />                             {<br />                                 if (dMinX > acEnt.GeometricExtents.MinPoint.X) dMinX = acEnt.GeometricExtents.MinPoint.X;<br />                                 if (dMinY > acEnt.GeometricExtents.MinPoint.Y) dMinY = acEnt.GeometricExtents.MinPoint.Y;<br />                                 if (dMaxX < acEnt.GeometricExtents.MaxPoint.X) dMaxX = acEnt.GeometricExtents.MaxPoint.X;<br />                                 if (dMaxY < acEnt.GeometricExtents.MaxPoint.Y) dMaxY = acEnt.GeometricExtents.MaxPoint.Y;<br />                             }<br />                         }<br />                         catch { }<br />                     }<br />                     txn.Commit();<br />                 }<br />                 objIds.Add(id);<br />             }<br />             using (Database acDatabase = new Database(true, false))<br />             {<br />                 db.Wblock(acDatabase, objIds, Point3d.Origin, DuplicateRecordCloning.Ignore);<br />                 ///translate to (0,0,0)<br />                 using (Transaction txn = acDatabase.TransactionManager.StartTransaction())<br />                 {<br />                     Matrix3d mat = Matrix3d.Displacement(new Point3d((dMinX + dMaxX) * 0.5, (dMinY + dMaxY) * 0.5, 0).GetVectorTo(Point3d.Origin));<br />                     BlockTable acBlkTbl = (BlockTable)txn.GetObject(acDatabase.BlockTableId, OpenMode.ForRead);<br />                     BlockTableRecord acBlkTblRcd = (BlockTableRecord)txn.GetObject(acBlkTbl[BlockTableRecord.ModelSpace], OpenMode.ForWrite);<br />                     foreach (ObjectId objId in acBlkTblRcd)<br />                     {<br />                         Entity acEnt = txn.GetObject(objId, OpenMode.ForWrite) as Entity;<br />                         if (null != acEnt)<br />                         {<br />                             acEnt.TransformBy(mat);<br />                         }<br />                     }<br />                     ed.ZoomExtens();<br />                     txn.Commit();<br />                 }<br />                 ///up to here<br />                 string FileName = "C:\\temp\\wblock.dwg";<br />                 acDatabase.SaveAs(FileName, DwgVersion.Current);<br />             }<br />         }