Cad二次开发双线（Demo）

通过偏移画双线，还未完成

[CommandMethod("DoubleLineDemo")]
public void DoubleLineDemo()
{Database db = HostApplicationServices.WorkingDatabase;Editor ed = Application.DocumentManager.MdiActiveDocument.Editor;List<ObjectId> lineList = new List<ObjectId>();Point3d pointStart = new Point3d(100, 100, 0);Point3d pointPre = pointStart;PromptPointResult ppr = ed.GetPoint2("\n 指定第一个点：");PromptDistanceOptions pdo = new PromptDistanceOptions("\n 输入墙体厚度：");List<Line> lineOffSet = new List<Line>();double dis = 100;PromptDoubleResult pdr = ed.GetDistance(pdo);if (pdr.Status == PromptStatus.Cancel){return;}if (pdr.Status == PromptStatus.None){return;}if (pdr.Status == PromptStatus.OK){dis = pdr.Value;}if (ppr.Status == PromptStatus.Cancel){return;}if (ppr.Status == PromptStatus.None){pointPre = pointStart;}if (ppr.Status == PromptStatus.OK){pointStart = ppr.Value;pointPre = pointStart;}while (true){ppr = ed.GetPoint("\n 指定下一点或 [闭合(C)]:", pointPre, new string[] { "C" });Point3d pointNext = new Point3d();if (ppr.Status == PromptStatus.Cancel){return;}if (ppr.Status == PromptStatus.None){return;}if (ppr.Status == PromptStatus.OK){pointNext = ppr.Value;ObjectId lId = db.AddLineToModelSpace(pointPre, pointNext);lineList.Add(lId);foreach (ObjectId lI in lineList){Entity entity = this.GetEntity(lI);lineOffSet.Add((Line)entity);}List<Line> ls = new List<Line>();for (int i = 0; i < lineOffSet.Count; i++){ls = this.OffSet(lineOffSet[i], dis);}for (int i = 0; i < ls.Count; i++){db.AddEntityToModelSpace(ls[i]);}pointPre = pointNext;}}
}

Cad二次开发双线（Demo）相关推荐

中望CAD二次开发环境配置及使用
今天第一次接触中望CAD的二次开发,首先就需要搭建开发环境,网上的资料太少了,试着自己做了一下,现将整个过程记录下来,备查. (1)下载中望CAD2018,我在官网下的,试用30天,没去找破解版.我用 ...
cad二次开发程序的绿色安装
此问题的引入是因为一个cad二次开发软件,客户要求做成绿色安装.何为绿色安装呢?软件包copy到一台电脑上(已安装CAD),双击exe,打开的界面包含自定义的菜单.菜单的图标能正确显示.每个功能能使用 ...
intersect 相交范围_关于CAD二次开发中(范围线自相交)相交线的问题
CAD二次开发对于毕业没多久,又是半路出家的我来说,是一个很大的挑战,遇到过很多难以解决的问题,这次在CAD二次开发遇到一个很苦恼的问题:判断一个由线段组成的闭合区域中,是否存在着相互之间相交的线段 ...
CAD 二次开发图层操作（1）创建图层
CAD二次开发的资料比较少,除了李冠亿先生的<深居浅出AutoCAD二次开发>这本书之外,目前没有找到合适的参考资料.现将自己工作中用的的一些方法贴出来.方便各位网友快速入门. #regi ...
CAD 二次开发图层操作（3）取得指定图层下的所有对象id
对于CAD二次开发的人来说,可能需要对某一图层下的实体(点,线,面域,块,三维实体)进行不同的操作.下面的方法,即可实现获取指定图层名称下的所有实体ID. 输入参数为图层名称: 返回值为:对象主键集合 ...
关于objectArx /CAD二次开发中“属性块”操作
关于objectArx /CAD二次开发中"属性块"操作属性块就是在图块上附加一些文字属性(Attribute),这些文字可以非常方便地修改.属性块被广泛应用在工程设计和机械设计 ...
c# cad二次开发 ribbon界面给CAD加个菜单栏
c# cad二次开发 ribbon界面给CAD加个菜单栏 using System; using System.Collections.Generic; using System.Text; usi ...
CAD二次开发：用C#在AutoCAD中插入栅格图像
CAD二次开发:用C#在AutoCAD中插入栅格图像 using Autodesk.AutoCAD.Runtime; using Autodesk.AutoCAD.ApplicationService ...
CAD二次开发资料汇总
欢迎加入建筑信息化开发交流群,获取开发资料群号:711844216 一.背景对工程出身的朋友来说,CAD就像一位朋友,常伴吾身,为了提高效率,于是小伙伴门开始尝试CAD二次开发,刚入门,资料去哪找 ...

Cad二次开发双线（Demo）

Cad二次开发双线（Demo）相关推荐

最新文章

热门文章