CAD二次验报告4.docx

实验四 用户交互、选择集及扩展属性一、主要内容1、基于用户交互式的信息输入2、创建选择集3、给图形实体添加扩展属性二、学时安排三、预习内容回顾用户交互命令的使用、选择集创建的几种方式，四、实验步骤4.1 用户交互Editor ed = Application.DocumentManager.MdiActiveDocument.Editor;//提示输入圆心坐标 PromptPointOptions fristpoint = new PromptPointOptions(\n请输入圆心：); …… //提示输入半径 PromptDoubleOptions r = new PromptDoubleOptions(\n请输入圆半径：);…… 4.1.1 读入字符串//获取提示框输入的或点选的坐标 PromptPointResult result = ed.GetPoint(fristpoint); Point3d p = result.Value; 4.1.2 读入Double型数据 //获取输入半径，并转换为double类型 PromptDoubleResult Temp_radius = ed.GetDouble(r); //通过PromptDoubleResult下的属性Value转换为.NET下的Double类型 double radius = Temp_radius.Value;4.1.3 读入Point//声明圆对象 Circle c = new Circle(); c.Center = p; c.Radius = radius;4.1.4 拾取实体Entity ent = (Entity)acTrans.GetObject(id, OpenMode.ForRead, false);4.1.5 打开dwg文件//打开并插入dwg文件[CommandMethod(insertdwg)] static public void insertdwg() { OpenFileDialog pOpenFileDialog = new OpenFileDialog(打开地形图, null, dwg, openfile, OpenFileDialog.OpenFileDialogFlags.DefaultIsFolder); pOpenFileDialog.ShowDialog(); string fname = pOpenFileDialog.Filename; Document doc = Application.DocumentManager.MdiActiveDocument; Editor ed = doc.Editor; if (!File.Exists(fname)) fname = HostApplicationServices.Current.FindFile(fname, doc.Database, FindFileHint.Default); using (Database db = new Database(false, false)) { db.ReadDwgFile(fname, FileShare.ReadWrite, true, null); using (Transaction t = doc.TransactionManager.StartTransaction()) { int n = fname.LastIndexOf(\\); ObjectId idBTR = doc.Database.Insert(fname.Substring(n + 1, fname.Length - n - 5), db, false); BlockTable bt = (BlockTable)t.GetObject(doc.Database.BlockTableId, OpenMode.ForWrite); BlockTableRecord btr = (BlockTableRecord)t.GetObject(bt[BlockTableRecord.ModelSpace], OpenMode.ForWrite); using (BlockReference bref = new BlockReference(Point3d.Origin, idBTR)) { DBObjectCollection pbrefColl = new DBObjectCollection(); bref.Explode(pbrefColl); int num = pbrefColl.Count; for (int i = 0; i num; i++) { btr.AppendEntity(pbrefColl[i] as Entity);