CAD二次实验报告3.docx

CAD开发实验（四）实验三 AutoCAD图形块的创建与应用一、主要内容1、创建块定义及插入块参照2、创建带有属性的块定义及插入带有属性的块参照3、在对话框中查看块定义的图标4、在当前文件中插入外部文件中的块5、在当前文件中插入其他DWG文件二、学时安排：2学时三、预习内容理解块的含义，回顾块和带属性块的定义四、AutoCAD图形块的创建与应用4.1创建块定义及插入块参照4.1.1 创建块定义 代码：/创建块 public Document pDoc = Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument; CommandMethod(CreateBlock) public void CreateBlock() Database acCurDb = pDoc.Database; using (Transaction acTrans = acCurDb.TransactionManager.StartTransaction() BlockTable acBlkTbl = acTrans.GetObject(acCurDb.BlockTableId, OpenMode.ForWrite) as BlockTable; / 创建新的块表记录 BlockTableRecord acBlkTblRec = new BlockTableRecord(); string blkname = 三角点; acBlkTblRec.Name = blkname; acBlkTblRec.Origin = new Point3d(0, 0, 0); Point3d pCenter = new Point3d(0, 0, 0); /创建中心点 DBPoint pDBPt = new DBPoint(pCenter); /创建圆 Circle pCir = new Circle(pCenter, new Vector3d(0, 0, 1), 0.25); /创建三角形 Polyline pTri = new Polyline(4); pTri.AddVertexAt(0, new Point2d(0, 1), 0, 0, 0); pTri.AddVertexAt(1, new Point2d(0.866, -0.5), 0, 0, 0); pTri.AddVertexAt(2, new Point2d(-0.866, -0.5), 0, 0, 0); pTri.AddVertexAt(3, new Point2d(0, 1), 0, 0, 0); /给定块的原点 acBlkTblRec.Origin = new Point3d(0, 0, 0); /将图形实体添加到块表记录 acBlkTblRec.AppendEntity(pDBPt); acBlkTblRec.AppendEntity(pCir); acBlkTblRec.AppendEntity(pTri); /将块记录添加到块表 acBlkTbl.Add(acBlkTblRec); acTrans.AddNewlyCreatedDBObject(acBlkTblRec, true); / 提交修改并销毁事务 acTrans.Commit(); 4.1.2插入卡块参照代码： /插入块 CommandMethod(InsertBlock) public void InsertBlock() Database acCurDb = pDoc.Database; / 启动一个事务 Start a transaction using (Transaction acTrans = acCurDb.TransactionManager.StartTransaction() BlockTable acBlkTbl = acTrans.GetObject( acCurDb.BlockTableId, OpenMode.ForWrite) as BlockTable; / 以写方式打开模型空间块表记录 BlockTableRecord acBlkTblRec = acTrans.GetObject( acBlkTblBlockTableRecord.ModelSpace, OpenMode.ForWrite) as BlockTableRecord; /获取三角点块，并创建块引用 BlockTableRecord pBlockTableRecord = acTrans.GetObject( acBlkTbl三角点, OpenMode.ForRead) as BlockTableRecord; BlockReference bref = new BlockReference( new Point3d(10, 10, 0), pBlockTableRecord.ObjectId); BlockReference bref2 = new BlockReference( new Point3d(30, 30, 0), pBlockTableRecord.ObjectId); acBlkTblRec.AppendEntity(bref2); acTrans.AddNewlyCreatedDBObject(bref2, true); acTrans.Commit(); 4.2创建带有属性的块定义及插入带有属性的块参照4.2.1 创建带有属性的块定义创建一个名为“三角点”的带属性块的记录，包括以下实体： 一个点 一个圆 一个三角形 一个名为三角点的属性代码： #region 创建带属性的块 CommandMethod(CreateAtrrBlock) public void CreateAtrrBlock() Database acCurDb = pDoc.Database; using (Transaction acTrans = acCurDb.TransactionManager.StartTransaction() BlockTable acBlkTbl = acTrans.GetObject(acCurDb.BlockTableId, OpenMode.ForWrite) as BlockTable; BlockTableRecord acBlkTblRec = new BlockTableRecord(); string blkname = 三角点; acBlkTblRec.Name = blkname; acBlkTblRec.Origin = new Point3d(0, 0, 0); Point3d pCenter = new Point3d(0, 0, 0); /创建中心点 DBPoint pDBPt = new DBPoint(pCenter); /创建圆 Circle pCir = new Circle(pCenter, new Vector3d(0, 0, 1), 0.25); /创建三角形 Polyline pTri = new Polyline(4); pTri.AddVertexAt(0, new Point2d(0, 1), 0, 0, 0); pTri.AddVertexAt(1, new Point2d(0.866, -0.5), 0, 0, 0); pTri.AddVertexAt(2, new Point2d(-0.866, -0.5), 0, 0, 0); pTri.AddVertexAt(3, new Point2d(0, 1), 0, 0, 0); Polyline pPl = new Polyline(2); pPl.AddVertexAt(0, new Point2d(0.9, 0), 0, 0, 0); pPl.AddVertexAt(1, new Point2d(4.5, 0), 0, 0, 0); /定义属性 Point3d pPosition = new Point3d(1, 0.2, 0); AttributeDefinition pAtrDef = new AttributeDefinition( pPosition, 洼地, 三角点名, 输入三角点名, acCurDb.Textstyle); pAtrDef.Height = 1; Point3d pPosition2 = new Point3d(1, -1.2, 0); AttributeDefinition pHVaue = new AttributeDefinition( pPosition2, 0.00, 高程值, 输入高程值, acCurDb.Textstyle); pHVaue.Height = 1; /给定块的原点 acBlkTblRec.Origin = new Point3d(0, 0, 0); /将图形实体添加到块表记录 acBlkTblRec.AppendEntity(pDBPt); acBlkTblRec.AppendEntity(pCir); acBlkTblRec.AppendEntity(pTri); acBlkTblRec.AppendEntity(pPl); acBlkTblRec.AppendEntity(pAtrDef); acBlkTblRec.AppendEntity(pHVaue); /将块记录添加到块表 acBlkTbl.Add(acBlkTblRec); acTrans.AddNewlyCreatedDBObject(acBlkTblRec, true); CreateBlockIcon cbi = new CreateBlockIcon(acBlkTblRec.Name); acTrans.Commit(); #endregion4.2.2 插入带有属性的块参照代码： #region 插入带属性的块 CommandMethod(InsertAtrrBlock) public void InsertAtrrBlock() Database acCurDb = pDoc.Database; using (Transaction acTrans = acCurDb.TransactionManager.StartTransaction() BlockTable acBlkTbl = acTrans.GetObject(acCurDb.BlockTableId, OpenMode.ForRead) as BlockTable; BlockTableRecord acBlkTblRec = acTrans.GetObject(acBlkTblBlockTableRecord.ModelSpace, OpenMode.ForWrite) as BlockTableRecord; BlockTableRecord pBlockTableRecord = acTrans.GetObject( acBlkTbl三角点, OpenMode.ForRead) as BlockTableRecord; BlockReference bref = new BlockReference( new Point3d(10, 10, 0), pBlockTableRecord.ObjectId); acBlkTblRec.AppendEntity(bref); acTrans.AddNewlyCreatedDBObject(bref, true); foreach (ObjectId id in pBlockTableRecord) Entity ent = (Entity)acTrans.GetObject(id, OpenMode.ForRead, false); /打开当前的对象! if (ent is AttributeDefinition) AttributeReference attRef = new AttributeReference(); AttributeDefinition attDef = (AttributeDefinition)ent; attRef.SetPropertiesFrom(attDef); attRef.Height = attDef.Height; attRef.Rotation = attDef.Rotation; attRef.Tag = attDef.Tag; if (attDef.Tag = 三角点名) attRef.Position = new Point3d(11.3, 10.3, 0); attRef.TextString = 洼地; else if (attDef.Tag = 高程值) attRef.Position = new Point3d(11, 8.8, 0); attRef.TextString = 65.99; if (!bref.IsWriteEnabled) bref.UpgradeOpen(); bref.AttributeCollecti