实例介绍
【实例简介】CAD二次开发C#代码,给定容差删除多段线、二维多段线、三维多段线上的重复点，CAD2010，VS2012
【实例截图】
【实例截图】
【核心代码】
using System;
using System.Collections;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using Autodesk.AutoCAD.Runtime;
using Autodesk.AutoCAD.EditorInput;
using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.Geometry;
[assembly:CommandClass(typeof(CheckDwgData.BasicCheck))]
namespace CheckDwgData
{
public class BasicCheck
{
/// <summary>
/// 删除重复点
/// </summary>
/// <param name="acadDoc">当前文档</param>
/// <param name="cur">曲线</param>
/// <param name="dblDis">容差</param>
public void DeleteDuplicatePoints(Document acadDoc, Curve cur, Double dblDis)
{
#region
Editor ed = acadDoc.Editor;
Database db=acadDoc.Database;
Point2d pt2d1 = new Point2d();
Point2d pt2d2 = new Point2d();
Point3d pt3d1 = new Point3d();
Point3d pt3d2 = new Point3d();
Tolerance tol = new Tolerance(dblDis, dblDis);
int intIndex = 0;
switch (cur.GetType().ToString())
{
case "Autodesk.AutoCAD.DatabaseServices.Polyline":
using (Transaction tr = db.TransactionManager.StartTransaction())
{
Polyline poly = cur as Polyline;
while (intIndex < poly.NumberOfVertices)
{
if (intIndex != poly.NumberOfVertices-1)
{
pt2d1 = poly.GetPoint2dAt(intIndex);
pt2d2 = poly.GetPoint2dAt(intIndex 1);
}
else if (poly.Closed == true)
{
pt2d1 = poly.GetPoint2dAt(intIndex);
pt2d2 = poly.GetPoint2dAt(0);
}
if (pt2d1.IsEqualTo(pt2d2,tol))
{
poly = (Polyline)tr.GetObject(poly.ObjectId, OpenMode.ForWrite);
poly.RemoveVertexAt(intIndex);
intIndex--;
}
intIndex ;
}
tr.Commit();
}
break;
case "Autodesk.AutoCAD.DatabaseServices.Polyline2d":
using (Transaction tr = db.TransactionManager.StartTransaction())
{
Polyline2d poly2d = cur as Polyline2d;
IEnumerator it= poly2d.GetEnumerator();
it.MoveNext();
Vertex2d ver2dFir = (Vertex2d)tr.GetObject((ObjectId)it.Current, OpenMode.ForWrite);
Vertex2d ver2dTmp = ver2dFir;
while(it.MoveNext())
{
Vertex2d ver2d = (Vertex2d)tr.GetObject((ObjectId)it.Current, OpenMode.ForWrite);
pt3d1 = ver2dTmp.Position;
pt3d2 = ver2d.Position;
if (pt3d1.IsEqualTo(pt3d2, tol))
{
ver2dTmp.Erase();
}
ver2dTmp = ver2d;
}
if (poly2d.Closed == true)
{
pt3d1 = ver2dTmp.Position;
pt3d2 = ver2dFir.Position;
if (pt3d1.IsEqualTo(pt3d2, tol))
{
ver2dTmp.Erase();
}
}
tr.Commit();
}
break;
case "Autodesk.AutoCAD.DatabaseServices.Polyline3d":
using (Transaction tr = db.TransactionManager.StartTransaction())
{
Polyline3d poly3d = cur as Polyline3d;
IEnumerator it= poly3d.GetEnumerator();
it.MoveNext();
PolylineVertex3d ver3dFir = tr.GetObject((ObjectId)it.Current, OpenMode.ForWrite) as PolylineVertex3d;
PolylineVertex3d ver3dTmp = ver3dFir;
while(it.MoveNext())
{
PolylineVertex3d ver3d =tr.GetObject((ObjectId)it.Current, OpenMode.ForWrite) as PolylineVertex3d;
pt3d1 = ver3dTmp.Position;
pt3d2 = ver3d.Position;
if (pt3d1.IsEqualTo(pt3d2, tol))
{
ver3dTmp.Erase();
}
ver3dTmp = ver3d;
}
if (poly3d.Closed == true)
{
pt3d1 = ver3dTmp.Position;
pt3d2 = ver3dFir.Position;
if (pt3d1.IsEqualTo(pt3d2, tol))
{
ver3dTmp.Erase();
}
}
tr.Commit();
}
break;
}
#endregion
}
[CommandMethod("Test")]
public void Test()
{
Document acadDoc = Application.DocumentManager.MdiActiveDocument;
Editor ed = acadDoc.Editor;
Entity ent = Entity("选择实体");
ed.WriteMessage(ent.GetType().ToString());
DeleteDuplicatePoints(acadDoc, (Curve)ent, 0.5);
}
/// <summary>
/// 选择单个实体
/// </summary>
/// <param name="strMsg"></param>
/// <returns></returns>
public static Entity Entity(string strMsg)
{
Document doc = Application.DocumentManager.MdiActiveDocument;
Editor ed = doc.Editor;
Database db = doc.Database;
Entity entity = null;
PromptEntityResult ent = ed.GetEntity(strMsg);
if (ent.Status == PromptStatus.OK)
{
using (Transaction tr = db.TransactionManager.StartTransaction())
{
entity = (Entity)tr.GetObject(ent.ObjectId, OpenMode.ForWrite, true);
tr.Commit();
}
}
return entity;
}
}
}
标签： 删除
好例子网口号：伸出你的我的手 — 分享！
网友评论
小贴士
感谢您为本站写下的评论，您的评论对其它用户来说具有重要的参考价值，所以请认真填写。
- 类似“顶”、“沙发”之类没有营养的文字，对勤劳贡献的楼主来说是令人沮丧的反馈信息。
- 相信您也不想看到一排文字/表情墙，所以请不要反馈意义不大的重复字符，也请尽量不要纯表情的回复。
- 提问之前请再仔细看一遍楼主的说明，或许是您遗漏了。
- 请勿到处挖坑绊人、招贴广告。既占空间让人厌烦，又没人会搭理，于人于己都无利。
关于好例子网
本站旨在为广大IT学习爱好者提供一个非营利性互相学习交流分享平台。本站所有资源都可以被免费获取学习研究。本站资源来自网友分享，对搜索内容的合法性不具有预见性、识别性、控制性，仅供学习研究，请务必在下载后24小时内给予删除，不得用于其他任何用途，否则后果自负。基于互联网的特殊性，平台无法对用户传输的作品、信息、内容的权属或合法性、安全性、合规性、真实性、科学性、完整权、有效性等进行实质审查；无论平台是否已进行审查，用户均应自行承担因其传输的作品、信息、内容而可能或已经产生的侵权或权属纠纷等法律责任。本站所有资源不代表本站的观点或立场，基于网友分享，根据中国法律《信息网络传播权保护条例》第二十二与二十三条之规定，若资源存在侵权或相关问题请联系本站客服人员，点此联系我们。关于更多版权及免责申明参见 版权及免责申明
支持(0) 盖楼(回复)
支持(0) 盖楼(回复)