C#开发的批量裁剪

CSharpBoy · 发表于 2016-9-1 11:06:53

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

// (C) Copyright 2002-2005 by Autodesk, Inc.
//
// Permission to use, copy, modify, and distribute this software in
// object code form for any purpose and without fee is hereby granted,
// provided that the above copyright notice appears in all copies and
// that both that copyright notice and the limited warranty and
// restricted rights notice below appear in all supporting
// documentation.
//
// AUTODESK PROVIDES THIS PROGRAM "AS IS" AND WITH ALL FAULTS.
// AUTODESK SPECIFICALLY DISCLAIMS ANY IMPLIED WARRANTY OF
// MERCHANTABILITY OR FITNESS FOR A PARTICULAR USE. AUTODESK, INC.
// DOES NOT WARRANT THAT THE OPERATION OF THE PROGRAM WILL BE
// UNINTERRUPTED OR ERROR FREE.
//
// Use, duplication, or disclosure by the U.S. ** is subject to
// restrictions set forth in FAR 52.227-19 (Commercial Computer
// Software - Restricted Rights) and DFAR 252.227-7013(c)(1)(ii)
// (Rights in Technical Data and Computer Software), as applicable.
//
using System;
using System.IO;
using System.Collections;
using System.Collections.Generic;
using System.Text;
using System.Runtime.InteropServices;
using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.Colors;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.EditorInput;
using Autodesk.AutoCAD.Geometry;
using Autodesk.AutoCAD.GraphicsInterface;
using Autodesk.AutoCAD.LayerManager;
using Autodesk.AutoCAD.Runtime;
using Autodesk.AutoCAD.Windows;
[assembly: CommandClass(typeof(CAIJIAN.Commands))]
namespace CAIJIAN
{
/// <summary>
/// Summary description for Commands.
/// </summary>
public class Commands
{
Editor m_ed = Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument.Editor;
Database m_db = HostApplicationServices.WorkingDatabase;
public Commands()
{
//
// TODO: Add constructor logic here
//
}
// Define Command "AsdkCmd1"
[CommandMethod("aaaa")]
public void test() // This method can have any name
{
#region 选择剪切边界实体
PromptEntityResult m_Per = null;
if (!m_SelectEntity("选择裁剪实体", "", new Type[] { typeof(Entity) }, ref m_Per)) return;
Entity m_TrimEdgeEnt = (Entity)m_OpenEntity(m_Per.ObjectId);//剪切边界实体
Curve m_TrimEdge = m_TrimEdgeEnt as Curve;
if (m_TrimEdge == null)
m_TrimEdge = m_CreateRectangle(m_TrimEdgeEnt.GeometricExtents.MinPoint, m_TrimEdgeEnt.GeometricExtents.MaxPoint, false);
#endregion
#region 选择剪切方向
Point3d m_Pt = new Point3d();
if (!m_GetPoint("\n剪切方向", ref m_Pt, new Point3d(), false, false)) return;
Point3d m_Pt1 = m_TrimEdge.GetClosestPointTo(m_Pt, false);//曲线外一点距曲线最近的点
Vector3d m_Vect = m_TrimEdge.GetFirstDerivative(m_Pt1);//曲线上此点的切向量
int m_Direct = m_PtSide(m_Pt1.Convert2d(new Plane()), m_Pt1.Add(m_Vect).Convert2d(new Plane()), m_Pt.Convert2d(new Plane()));//裁剪方向
#endregion
// AcadApplication m_AcadApp = (AcadApplication)Autodesk.AutoCAD.ApplicationServices.Application.AcadApplication;
// m_AcadApp.ZoomWindow(m_TrimEdge.GeomExtents.MinPoint.ToArray(), m_TrimEdge.GeomExtents.MaxPoint.ToArray());
//选择与剪切边包围的所有实体
PromptSelectionResult m_psr = m_ed.SelectCrossingWindow(m_TrimEdge.GeometricExtents.MinPoint, m_TrimEdge.GeometricExtents.MaxPoint);
#region 剪切
int i = 0;
foreach (ObjectId objid in m_psr.Value.GetObjectIds())
{
if (!objid.Equals(m_Per.ObjectId))
{
Curve m_Cur = m_OpenEntity(objid) as Curve;
if (m_Cur != null)//判断是否曲线实体
{
if (m_Cur is Polyline2d)
m_Cur = m_Polyline2dToLWPolyline(objid);//二维多段线转换为轻量多段线
DBObjectCollection m_ObjColl = new DBObjectCollection();
if (m_TrimCurve(m_Cur, m_TrimEdge, m_Direct, ref m_ObjColl))
{
foreach (Entity ent in m_ObjColl) m_CreateEntity(ent);
m_EraseEntity(objid);
}
}
}
m_ed.WriteMessage("\r正在裁剪...已完成{0}％", ((double)(++i * 100.0 / m_psr.Value.GetObjectIds().GetLength(0))).ToString("0"));
}
#endregion
// m_AcadApp.ZoomPrevious();
}
private bool m_TrimCurve(Curve m_Cur, Entity m_TrimEdgeEnt, int m_Direction, ref DBObjectCollection m_ObjColl)
{
//m_Cur —被剪曲线；m_TrimEdge —剪切边界曲线
//m_Direction —剪切方向，只能是1或-1，1—剪掉边界曲线右边的线，-1—剪左边
//返回true —剪切成功，保留的实体保存在m_ObjColl中
//判断被剪曲线是否位于锁定图层上
LayerTableRecord m_ltr = (LayerTableRecord)m_OpenEntity(m_Cur.LayerId);
if (m_ltr.IsLocked) return false;
if (!(m_TrimEdgeEnt is Curve))//剪切实体不是曲线类，则用其边界框做为剪切边界
m_TrimEdgeEnt = m_CreateRectangle(m_TrimEdgeEnt.GeometricExtents.MinPoint, m_TrimEdgeEnt.GeometricExtents.MaxPoint, false);
Curve m_TrimEdge = m_TrimEdgeEnt as Curve;
bool m_ReturnFlag = true;
m_ObjColl = new DBObjectCollection();//初始化为空
Point3dCollection m_InterPts = m_GetIntersectPoints(m_Cur, (Curve)m_TrimEdge);//求被剪曲线与剪切边的交点
if (m_InterPts.Count > 0)//判断曲线是否与剪切边相交
{
try
{
#region 生成交点处拆分的实体集合
DBObjectCollection m_Objs = new DBObjectCollection();
if (m_Cur is Circle)//判断曲线是否为园
{
#region 由交点把园拆分为几条圆弧
Circle m_cir = m_Cur as Circle;
ArrayList m_AngArr = new ArrayList();
int n;
for (n = 0; n < m_InterPts.Count; n++)
m_AngArr.Add(m_InterPts[n].GetVectorTo(m_cir.Center).AngleOnPlane(new Plane()));
m_AngArr.Sort();
m_AngArr.Add(m_AngArr[0]);
for (n = 0; n < m_AngArr.Count - 1; n++)
m_Objs.Add(new Arc(m_cir.Center, m_cir.Radius, (double)m_AngArr[n], (double)m_AngArr[n + 1]));
#endregion
}
else
m_Objs = m_Cur.GetSplitCurves(m_InterPts);//拆分曲线实体
#endregion
#region 对拆分实体集合中各实体进行判断，那些需要保留
foreach (Curve cur in m_Objs)
{
ObjectId m_CurId = m_CreateEntity(cur);//先生成实体，主要是三维多段线有问题，EndPoint属性老是错误！！！
Curve m_CurNew = m_OpenEntity(m_CurId) as Curve;
double m_Param = m_CurNew.StartParam + 0.0001;
if (!m_InterPts.Contains(m_CurNew.StartPoint))//点不是交点
m_Param = m_CurNew.EndParam - 0.0001;
Point3d m_Pt1 = m_CurNew.GetPointAtParameter(m_Param);
Point3d m_Pt2 = m_TrimEdge.GetClosestPointTo(m_Pt1, false);
Vector3d m_Vect = m_TrimEdge.GetFirstDerivative(m_Pt2);
int m_Direct = m_PtSide(m_Pt2.Convert2d(new Plane()), m_Pt2.Add(m_Vect).Convert2d(new Plane()), m_Pt1.Convert2d(new Plane()));
if (m_Direct != m_Direction) m_ObjColl.Add((DBObject)m_CurNew.Clone());//保存被剪之后的新实体
m_EraseEntity(m_CurId);
}
#endregion
}
catch
{
m_ReturnFlag = false;
}
}
else
m_ReturnFlag = false;
return m_ReturnFlag;
}
#region 公共函数
//创建实体,把实体加入CAD数据库
public ObjectId m_CreateEntity(Entity m_entity)
{
ObjectId m_objid = new ObjectId();
if (m_entity != null)
{
using (Application.DocumentManager.MdiActiveDocument.LockDocument())
{
using (Transaction m_tr = m_db.TransactionManager.StartTransaction())
{
BlockTableRecord m_btr = (BlockTableRecord)m_tr.GetObject(m_db.CurrentSpaceId, OpenMode.ForWrite, false);
m_objid = m_btr.AppendEntity(m_entity);
m_tr.AddNewlyCreatedDBObject(m_entity, true);
m_tr.Commit();
}
}
}
return m_objid;
}
//删除实体
public void m_EraseEntity(ObjectId m_EntityId)
{
using (DocumentLock m_doclock = Application.DocumentManager.MdiActiveDocument.LockDocument())
{
if (!m_EntityId.IsNull && !m_EntityId.IsErased)
{
Entity m_Ent = m_OpenEntity(m_EntityId) as Entity;
LayerTableRecord m_ltr = (LayerTableRecord)m_OpenEntity(m_Ent.LayerId);
if (!m_ltr.IsLocked)//实体不在锁定图层上
{
using (Transaction m_tr = m_db.TransactionManager.StartTransaction())
{
try
{
Entity m_Entity = (Entity)m_tr.GetObject(m_EntityId, OpenMode.ForWrite, false);
if (m_Entity != null) m_Entity.Erase();
}
catch { }
m_tr.Commit();
}
}
}
}
}
public void m_EraseEntity(Entity m_Entity)
{
using (DocumentLock m_doclock = Application.DocumentManager.MdiActiveDocument.LockDocument())
{
if (m_Entity != null) m_Entity.Erase();
else m_Entity.Dispose();
}
}
//打开实体
public Object m_OpenEntity(ObjectId m_ObjId)
{
Object m_Obj = new Object();
if (!m_ObjId.IsNull)
{
using (Transaction m_tr = m_db.TransactionManager.StartTransaction())
{
m_Obj = (Object)m_tr.GetObject(m_ObjId, OpenMode.ForRead);
m_tr.Commit();
}
}
return m_Obj;
}
//生成矩形
public Polyline m_CreateRectangle(Point3d m_Pt1, Point3d m_Pt2, bool m_bLUorLW)
{
if (!m_bLUorLW)//不是左上和右下点，而是左下点和右上点
{
Point3d m_Pt3 = m_Pt1, m_Pt4 = m_Pt2;
m_Pt1 = new Point3d(m_Pt3.X, m_Pt4.Y, 0);
m_Pt2 = new Point3d(m_Pt4.X, m_Pt3.Y, 0);
}
Polyline m_lwpline = new Polyline();
m_lwpline.AddVertexAt(0, m_Pt1.Convert2d(new Plane()), 0, 0, 0);
m_lwpline.AddVertexAt(1, new Point2d(m_Pt2.X, m_Pt1.Y), 0, 0, 0);
m_lwpline.AddVertexAt(2, m_Pt2.Convert2d(new Plane()), 0, 0, 0);
m_lwpline.AddVertexAt(3, new Point2d(m_Pt1.X, m_Pt2.Y), 0, 0, 0);
m_lwpline.Closed = true;
return m_lwpline;
}
//提示用户输入一点
public bool m_GetPoint(string m_Msg, ref Point3d m_Pt, Point3d m_BasePoint, bool m_AllowNone, bool m_UseBasePoint)
{
if (!m_Pt.Equals(new Point3d())) m_Msg += "<" + m_Pt.X.ToString() + "," + m_Pt.Y.ToString() + "," + m_Pt.Z.ToString() + ">";
PromptPointOptions m_ppo = new PromptPointOptions("\n" + m_Msg);
m_ppo.AllowNone = m_AllowNone;
m_ppo.BasePoint = m_BasePoint;
m_ppo.UseBasePoint = m_UseBasePoint;
PromptPointResult m_ppr = m_ed.GetPoint(m_ppo);
if (m_ppr.Status != PromptStatus.OK)
{
if (m_ppr.Status == PromptStatus.None) { m_Pt = m_BasePoint; return true; }
else return false;
}
m_Pt = m_ppr.Value;
return true;
}
//提示选择单个实体
public bool m_SelectEntity(string m_MSG, string m_RejectMSG, Type[] m_EntityType, ref PromptEntityResult m_PER)
{
PromptEntityOptions m_peo = new PromptEntityOptions((m_MSG.Substring(0, 2).Equals("\n") ? m_MSG : "\n" + m_MSG));
m_peo.SetRejectMessage(m_RejectMSG);
foreach (Type et in m_EntityType) m_peo.AddAllowedClass(et, false);
m_peo.AllowNone = true;
m_PER = m_ed.GetEntity(m_peo);
if (m_PER.Status != PromptStatus.OK) return false;
else return true;
}
//判断点pt在直线pt1->Pt2的哪一侧？返回值：1右侧；0三点共线；-1左侧
public int m_PtSide(Point2d pt1, Point2d pt2, Point2d pt)
{
Vector2d m_vect1 = pt1.GetVectorTo(pt2);
Vector2d m_vect2 = pt1.GetVectorTo(pt);
double m_value = m_vect2.X * m_vect1.Y - m_vect1.X * m_vect2.Y;
if (Math.Abs(m_value) < 0.0000001) return 0;
else if (m_value > 0) return 1;
else return -1;
}
//求空间两曲线c1与c2在c1上的交点(带标高值)
public Point3dCollection m_GetIntersectPoints(Curve c1, Curve c2)
{
Point3dCollection m_interpts = new Point3dCollection(), m_interpts1 = new Point3dCollection();
Point3dCollection m_VertexPoints = new Point3dCollection();
c1.IntersectWith(c2, Intersect.OnBothOperands, new Plane(), m_interpts, 0, 0);//求交点
if (c1 is Polyline3d && !(c2 is Polyline3d))
{
foreach (Point3d pt in m_interpts)
{
Polyline3d m_pl3d = new Polyline3d(Poly3dType.SimplePoly,
new Point3dCollection(new Point3d[] { pt, pt.Add(new Vector3d(0, 0, 10)) }), false);
Point3dCollection m_Pts = new Point3dCollection();
c1.IntersectWith(m_pl3d, Intersect.ExtendArgument, new Plane(), m_Pts, 0, 0);
foreach (Point3d pt1 in m_Pts) m_interpts1.Add(pt1);
}
m_interpts = m_interpts1;
}
//去掉不正确的交点（IntersectWith求出的交点有可能不正确！！！）
ArrayList m_DistPtList = new ArrayList();
foreach (Point3d pt in m_interpts)
{
try
{
double m_Dist = c1.GetDistAtPoint(pt);//点是否在曲线上？
m_DistPoint3d m_DP = new m_DistPoint3d();
m_DP.m_dist = m_Dist;
m_DP.m_pt = pt;
m_DistPtList.Add(m_DP);
}
catch { }
}
m_DistPtList.Sort(new m_DistPtsSort());//排序
m_interpts1 = new Point3dCollection();
foreach (m_DistPoint3d dp in m_DistPtList) m_interpts1.Add(dp.m_pt);
return m_interpts1;
}
private struct m_DistPoint3d
{
public double m_dist;
public Point3d m_pt;
}
private class m_DistPtsSort : IComparer
{
int IComparer.Compare(object a, object b)
{
m_DistPoint3d dp1 = (m_DistPoint3d)a;
m_DistPoint3d dp2 = (m_DistPoint3d)b;
if (dp1.m_dist > dp2.m_dist)
return 1;
if (dp1.m_dist < dp2.m_dist)
return -1;
else
return 0;
}
}
//二维多段线转换为轻量多段线
public Polyline m_Polyline2dToLWPolyline(ObjectId m_ObjId)
{
Polyline m_pl = new Polyline();
Polyline2d m_pl2d = m_OpenEntity(m_ObjId) as Polyline2d;
if (m_pl2d != null)
{
switch (m_pl2d.PolyType)
{
case Poly2dType.FitCurvePoly:
m_pl.ConvertFrom(m_pl2d, false);
break;
case Poly2dType.SimplePoly:
case Poly2dType.CubicSplinePoly:
case Poly2dType.QuadSplinePoly:
int index = 0;
foreach (ObjectId vid in m_pl2d)
{
Vertex2d v2d = m_OpenEntity(vid) as Vertex2d;
if (v2d.VertexType != Vertex2dType.SplineControlVertex)
m_pl.AddVertexAt(index++, new Point2d(v2d.Position.X, v2d.Position.Y), 0, v2d.StartWidth, v2d.EndWidth);
}
m_pl.LayerId = m_pl2d.LayerId;//继承层属性
m_pl.Elevation = m_pl2d.Elevation;//继承高程属性
m_pl.LinetypeId = m_pl2d.LinetypeId;//继承线型属性
m_pl.ColorIndex = m_pl2d.ColorIndex;//继承颜色属性
break;
default:
break;
}
}
return m_pl;
}
#endregion
}
}

// (C) Copyright 2002-2005 by Autodesk, Inc. 
// 
// Permission to use, copy, modify, and distribute this software in 
// object code form for any purpose and without fee is hereby granted, 
// provided that the above copyright notice appears in all copies and 
// that both that copyright notice and the limited warranty and 
// restricted rights notice below appear in all supporting 
// documentation. 
// 
// AUTODESK PROVIDES THIS PROGRAM "AS IS" AND WITH ALL FAULTS. 
// AUTODESK SPECIFICALLY DISCLAIMS ANY IMPLIED WARRANTY OF 
// MERCHANTABILITY OR FITNESS FOR A PARTICULAR USE.  AUTODESK, INC. 
// DOES NOT WARRANT THAT THE OPERATION OF THE PROGRAM WILL BE 
// UNINTERRUPTED OR ERROR FREE. 
// 
// Use, duplication, or disclosure by the U.S. ** is subject to 
// restrictions set forth in FAR 52.227-19 (Commercial Computer 
// Software - Restricted Rights) and DFAR 252.227-7013(c)(1)(ii) 
// (Rights in Technical Data and Computer Software), as applicable. 
// 
 
 
using System; 
using System.IO; 
using System.Collections; 
using System.Collections.Generic; 
using System.Text; 
using System.Runtime.InteropServices; 
 
using Autodesk.AutoCAD.ApplicationServices; 
using Autodesk.AutoCAD.Colors; 
using Autodesk.AutoCAD.DatabaseServices; 
using Autodesk.AutoCAD.EditorInput; 
using Autodesk.AutoCAD.Geometry; 
using Autodesk.AutoCAD.GraphicsInterface; 
using Autodesk.AutoCAD.LayerManager; 
using Autodesk.AutoCAD.Runtime; 
using Autodesk.AutoCAD.Windows; 
 
 
[assembly: CommandClass(typeof(CAIJIAN.Commands))] 
 
namespace CAIJIAN 
{ 
    /// <summary> 
    /// Summary description for Commands. 
    /// </summary> 
    public class Commands 
    { 
        Editor m_ed = Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument.Editor; 
        Database m_db = HostApplicationServices.WorkingDatabase; 
        public Commands() 
        { 
            // 
            // TODO: Add constructor logic here 
            // 
        } 
 
        // Define Command "AsdkCmd1" 
        [CommandMethod("aaaa")] 
     public void test() // This method can have any name 
        { 
            #region 选择剪切边界实体 
            PromptEntityResult m_Per = null; 
            if (!m_SelectEntity("选择裁剪实体", "", new Type[] { typeof(Entity) }, ref m_Per)) return; 
 
            Entity m_TrimEdgeEnt = (Entity)m_OpenEntity(m_Per.ObjectId);//剪切边界实体 
            Curve m_TrimEdge = m_TrimEdgeEnt as Curve; 
            if (m_TrimEdge == null) 
                m_TrimEdge = m_CreateRectangle(m_TrimEdgeEnt.GeometricExtents.MinPoint, m_TrimEdgeEnt.GeometricExtents.MaxPoint, false); 
            #endregion 
 
            #region 选择剪切方向 
            Point3d m_Pt = new Point3d(); 
            if (!m_GetPoint("\n剪切方向", ref m_Pt, new Point3d(), false, false)) return; 
 
            Point3d m_Pt1 = m_TrimEdge.GetClosestPointTo(m_Pt, false);//曲线外一点距曲线最近的点 
            Vector3d m_Vect = m_TrimEdge.GetFirstDerivative(m_Pt1);//曲线上此点的切向量 
            int m_Direct = m_PtSide(m_Pt1.Convert2d(new Plane()), m_Pt1.Add(m_Vect).Convert2d(new Plane()), m_Pt.Convert2d(new Plane()));//裁剪方向 
            #endregion 
 
            // AcadApplication m_AcadApp = (AcadApplication)Autodesk.AutoCAD.ApplicationServices.Application.AcadApplication; 
            // m_AcadApp.ZoomWindow(m_TrimEdge.GeomExtents.MinPoint.ToArray(), m_TrimEdge.GeomExtents.MaxPoint.ToArray()); 
 
            //选择与剪切边包围的所有实体 
            PromptSelectionResult m_psr = m_ed.SelectCrossingWindow(m_TrimEdge.GeometricExtents.MinPoint, m_TrimEdge.GeometricExtents.MaxPoint); 
 
            #region 剪切 
            int i = 0; 
            foreach (ObjectId objid in m_psr.Value.GetObjectIds()) 
            { 
                if (!objid.Equals(m_Per.ObjectId)) 
                { 
                    Curve m_Cur = m_OpenEntity(objid) as Curve; 
                    if (m_Cur != null)//判断是否曲线实体 
                    { 
                        if (m_Cur is Polyline2d) 
                            m_Cur = m_Polyline2dToLWPolyline(objid);//二维多段线转换为轻量多段线 
 
                        DBObjectCollection m_ObjColl = new DBObjectCollection(); 
                        if (m_TrimCurve(m_Cur, m_TrimEdge, m_Direct, ref m_ObjColl)) 
                        { 
                            foreach (Entity ent in m_ObjColl) m_CreateEntity(ent); 
                            m_EraseEntity(objid); 
                        } 
                    } 
                } 
                m_ed.WriteMessage("\r正在裁剪...已完成{0}％", ((double)(++i * 100.0 / m_psr.Value.GetObjectIds().GetLength(0))).ToString("0")); 
            } 
            #endregion 
 
            // m_AcadApp.ZoomPrevious(); 
        } 
        private bool m_TrimCurve(Curve m_Cur, Entity m_TrimEdgeEnt, int m_Direction, ref DBObjectCollection m_ObjColl) 
        { 
            //m_Cur —被剪曲线；m_TrimEdge  —剪切边界曲线 
            //m_Direction —剪切方向，只能是1或-1，1—剪掉边界曲线右边的线，-1—剪左边 
            //返回true  —剪切成功，保留的实体保存在m_ObjColl中 
 
            //判断被剪曲线是否位于锁定图层上 
            LayerTableRecord m_ltr = (LayerTableRecord)m_OpenEntity(m_Cur.LayerId); 
            if (m_ltr.IsLocked) return false; 
 
            if (!(m_TrimEdgeEnt is Curve))//剪切实体不是曲线类，则用其边界框做为剪切边界 
                m_TrimEdgeEnt = m_CreateRectangle(m_TrimEdgeEnt.GeometricExtents.MinPoint, m_TrimEdgeEnt.GeometricExtents.MaxPoint, false); 
            Curve m_TrimEdge = m_TrimEdgeEnt as Curve; 
 
            bool m_ReturnFlag = true; 
            m_ObjColl = new DBObjectCollection();//初始化为空 
 
            Point3dCollection m_InterPts = m_GetIntersectPoints(m_Cur, (Curve)m_TrimEdge);//求被剪曲线与剪切边的交点 
            if (m_InterPts.Count > 0)//判断曲线是否与剪切边相交 
            { 
                try 
                { 
                    #region 生成交点处拆分的实体集合 
                    DBObjectCollection m_Objs = new DBObjectCollection(); 
                    if (m_Cur is Circle)//判断曲线是否为园 
                    { 
                        #region 由交点把园拆分为几条圆弧 
                        Circle m_cir = m_Cur as Circle; 
                        ArrayList m_AngArr = new ArrayList(); 
                        int n; 
                        for (n = 0; n < m_InterPts.Count; n++) 
                            m_AngArr.Add(m_InterPts[n].GetVectorTo(m_cir.Center).AngleOnPlane(new Plane())); 
                        m_AngArr.Sort(); 
                        m_AngArr.Add(m_AngArr[0]); 
 
                        for (n = 0; n < m_AngArr.Count - 1; n++) 
                            m_Objs.Add(new Arc(m_cir.Center, m_cir.Radius, (double)m_AngArr[n], (double)m_AngArr[n + 1])); 
                        #endregion 
                    } 
                    else 
                        m_Objs = m_Cur.GetSplitCurves(m_InterPts);//拆分曲线实体 
                    #endregion 
 
                    #region 对拆分实体集合中各实体进行判断，那些需要保留 
                    foreach (Curve cur in m_Objs) 
                    { 
                        ObjectId m_CurId = m_CreateEntity(cur);//先生成实体，主要是三维多段线有问题，EndPoint属性老是错误！！！ 
                        Curve m_CurNew = m_OpenEntity(m_CurId) as Curve; 
 
                        double m_Param = m_CurNew.StartParam + 0.0001; 
                        if (!m_InterPts.Contains(m_CurNew.StartPoint))//点不是交点 
                            m_Param = m_CurNew.EndParam - 0.0001; 
 
                        Point3d m_Pt1 = m_CurNew.GetPointAtParameter(m_Param); 
                        Point3d m_Pt2 = m_TrimEdge.GetClosestPointTo(m_Pt1, false); 
                        Vector3d m_Vect = m_TrimEdge.GetFirstDerivative(m_Pt2); 
 
                        int m_Direct = m_PtSide(m_Pt2.Convert2d(new Plane()), m_Pt2.Add(m_Vect).Convert2d(new Plane()), m_Pt1.Convert2d(new Plane())); 
                        if (m_Direct != m_Direction) m_ObjColl.Add((DBObject)m_CurNew.Clone());//保存被剪之后的新实体 
 
                        m_EraseEntity(m_CurId); 
                    } 
                    #endregion 
                } 
                catch 
                { 
                    m_ReturnFlag = false; 
                } 
            } 
            else 
                m_ReturnFlag = false; 
 
            return m_ReturnFlag; 
        } 
        #region 公共函数 
        //创建实体,把实体加入CAD数据库 
        public ObjectId m_CreateEntity(Entity m_entity) 
        { 
            ObjectId m_objid = new ObjectId(); 
            if (m_entity != null) 
            { 
                using (Application.DocumentManager.MdiActiveDocument.LockDocument()) 
                { 
                    using (Transaction m_tr = m_db.TransactionManager.StartTransaction()) 
                    { 
                        BlockTableRecord m_btr = (BlockTableRecord)m_tr.GetObject(m_db.CurrentSpaceId, OpenMode.ForWrite, false); 
                        m_objid = m_btr.AppendEntity(m_entity); 
                        m_tr.AddNewlyCreatedDBObject(m_entity, true); 
                        m_tr.Commit(); 
                    } 
                } 
            } 
            return m_objid; 
        } 
 
        //删除实体 
        public void m_EraseEntity(ObjectId m_EntityId) 
        { 
            using (DocumentLock m_doclock = Application.DocumentManager.MdiActiveDocument.LockDocument()) 
            { 
                if (!m_EntityId.IsNull && !m_EntityId.IsErased) 
                { 
                    Entity m_Ent = m_OpenEntity(m_EntityId) as Entity; 
                    LayerTableRecord m_ltr = (LayerTableRecord)m_OpenEntity(m_Ent.LayerId); 
                    if (!m_ltr.IsLocked)//实体不在锁定图层上 
                    { 
                        using (Transaction m_tr = m_db.TransactionManager.StartTransaction()) 
                        { 
                            try 
                            { 
                                Entity m_Entity = (Entity)m_tr.GetObject(m_EntityId, OpenMode.ForWrite, false); 
                                if (m_Entity != null) m_Entity.Erase(); 
                            } 
                            catch { } 
                            m_tr.Commit(); 
                        } 
                    } 
                } 
            } 
        } 
        public void m_EraseEntity(Entity m_Entity) 
        { 
            using (DocumentLock m_doclock = Application.DocumentManager.MdiActiveDocument.LockDocument()) 
            { 
                if (m_Entity != null) m_Entity.Erase(); 
                else m_Entity.Dispose(); 
            } 
        } 
 
        //打开实体 
        public Object m_OpenEntity(ObjectId m_ObjId) 
        { 
            Object m_Obj = new Object(); 
            if (!m_ObjId.IsNull) 
            { 
                using (Transaction m_tr = m_db.TransactionManager.StartTransaction()) 
                { 
                    m_Obj = (Object)m_tr.GetObject(m_ObjId, OpenMode.ForRead); 
                    m_tr.Commit(); 
                } 
            } 
 
            return m_Obj; 
        } 
 
        //生成矩形 
        public Polyline m_CreateRectangle(Point3d m_Pt1, Point3d m_Pt2, bool m_bLUorLW) 
        { 
            if (!m_bLUorLW)//不是左上和右下点，而是左下点和右上点 
            { 
                Point3d m_Pt3 = m_Pt1, m_Pt4 = m_Pt2; 
                m_Pt1 = new Point3d(m_Pt3.X, m_Pt4.Y, 0); 
                m_Pt2 = new Point3d(m_Pt4.X, m_Pt3.Y, 0); 
            } 
 
            Polyline m_lwpline = new Polyline(); 
            m_lwpline.AddVertexAt(0, m_Pt1.Convert2d(new Plane()), 0, 0, 0); 
            m_lwpline.AddVertexAt(1, new Point2d(m_Pt2.X, m_Pt1.Y), 0, 0, 0); 
            m_lwpline.AddVertexAt(2, m_Pt2.Convert2d(new Plane()), 0, 0, 0); 
            m_lwpline.AddVertexAt(3, new Point2d(m_Pt1.X, m_Pt2.Y), 0, 0, 0); 
            m_lwpline.Closed = true; 
            return m_lwpline; 
        } 
 
        //提示用户输入一点 
        public bool m_GetPoint(string m_Msg, ref Point3d m_Pt, Point3d m_BasePoint, bool m_AllowNone, bool m_UseBasePoint) 
        { 
            if (!m_Pt.Equals(new Point3d())) m_Msg += "<" + m_Pt.X.ToString() + "," + m_Pt.Y.ToString() + "," + m_Pt.Z.ToString() + ">"; 
 
            PromptPointOptions m_ppo = new PromptPointOptions("\n" + m_Msg); 
            m_ppo.AllowNone = m_AllowNone; 
            m_ppo.BasePoint = m_BasePoint; 
            m_ppo.UseBasePoint = m_UseBasePoint; 
 
            PromptPointResult m_ppr = m_ed.GetPoint(m_ppo); 
 
            if (m_ppr.Status != PromptStatus.OK) 
            { 
                if (m_ppr.Status == PromptStatus.None) { m_Pt = m_BasePoint; return true; } 
                else return false; 
            } 
            m_Pt = m_ppr.Value; 
 
            return true; 
        } 
 
        //提示选择单个实体 
        public bool m_SelectEntity(string m_MSG, string m_RejectMSG, Type[] m_EntityType, ref PromptEntityResult m_PER) 
        { 
            PromptEntityOptions m_peo = new PromptEntityOptions((m_MSG.Substring(0, 2).Equals("\n") ? m_MSG : "\n" + m_MSG)); 
            m_peo.SetRejectMessage(m_RejectMSG); 
            foreach (Type et in m_EntityType) m_peo.AddAllowedClass(et, false); 
            m_peo.AllowNone = true; 
 
            m_PER = m_ed.GetEntity(m_peo); 
            if (m_PER.Status != PromptStatus.OK) return false; 
            else return true; 
        } 
 
        //判断点pt在直线pt1->Pt2的哪一侧？返回值：1右侧；0三点共线；-1左侧 
        public int m_PtSide(Point2d pt1, Point2d pt2, Point2d pt) 
        { 
            Vector2d m_vect1 = pt1.GetVectorTo(pt2); 
            Vector2d m_vect2 = pt1.GetVectorTo(pt); 
            double m_value = m_vect2.X * m_vect1.Y - m_vect1.X * m_vect2.Y; 
            if (Math.Abs(m_value) < 0.0000001) return 0; 
            else if (m_value > 0) return 1; 
            else return -1; 
        } 
 
        //求空间两曲线c1与c2在c1上的交点(带标高值) 
        public Point3dCollection m_GetIntersectPoints(Curve c1, Curve c2) 
        { 
            Point3dCollection m_interpts = new Point3dCollection(), m_interpts1 = new Point3dCollection(); 
            Point3dCollection m_VertexPoints = new Point3dCollection(); 
            c1.IntersectWith(c2, Intersect.OnBothOperands, new Plane(), m_interpts, 0, 0);//求交点 
 
            if (c1 is Polyline3d && !(c2 is Polyline3d)) 
            { 
                foreach (Point3d pt in m_interpts) 
                { 
                    Polyline3d m_pl3d = new Polyline3d(Poly3dType.SimplePoly, 
                        new Point3dCollection(new Point3d[] { pt, pt.Add(new Vector3d(0, 0, 10)) }), false); 
 
                    Point3dCollection m_Pts = new Point3dCollection(); 
                    c1.IntersectWith(m_pl3d, Intersect.ExtendArgument, new Plane(), m_Pts, 0, 0); 
                    foreach (Point3d pt1 in m_Pts) m_interpts1.Add(pt1); 
                } 
                m_interpts = m_interpts1; 
            } 
 
            //去掉不正确的交点（IntersectWith求出的交点有可能不正确！！！） 
            ArrayList m_DistPtList = new ArrayList(); 
            foreach (Point3d pt in m_interpts) 
            { 
                try 
                { 
                    double m_Dist = c1.GetDistAtPoint(pt);//点是否在曲线上？ 
                    m_DistPoint3d m_DP = new m_DistPoint3d(); 
                    m_DP.m_dist = m_Dist; 
                    m_DP.m_pt = pt; 
                    m_DistPtList.Add(m_DP); 
                } 
                catch { } 
            } 
 
            m_DistPtList.Sort(new m_DistPtsSort());//排序 
            m_interpts1 = new Point3dCollection(); 
            foreach (m_DistPoint3d dp in m_DistPtList) m_interpts1.Add(dp.m_pt); 
 
            return m_interpts1; 
        } 
        private struct m_DistPoint3d 
        { 
            public double m_dist; 
            public Point3d m_pt; 
        } 
        private class m_DistPtsSort : IComparer 
        { 
            int IComparer.Compare(object a, object b) 
            { 
                m_DistPoint3d dp1 = (m_DistPoint3d)a; 
                m_DistPoint3d dp2 = (m_DistPoint3d)b; 
                if (dp1.m_dist > dp2.m_dist) 
                    return 1; 
                if (dp1.m_dist < dp2.m_dist) 
                    return -1; 
                else 
                    return 0; 
            } 
        } 
 
        //二维多段线转换为轻量多段线 
        public Polyline m_Polyline2dToLWPolyline(ObjectId m_ObjId) 
        { 
            Polyline m_pl = new Polyline(); 
 
            Polyline2d m_pl2d = m_OpenEntity(m_ObjId) as Polyline2d; 
            if (m_pl2d != null) 
            { 
                switch (m_pl2d.PolyType) 
                { 
                    case Poly2dType.FitCurvePoly: 
                        m_pl.ConvertFrom(m_pl2d, false); 
                        break; 
                    case Poly2dType.SimplePoly: 
                    case Poly2dType.CubicSplinePoly: 
                    case Poly2dType.QuadSplinePoly: 
                        int index = 0; 
                        foreach (ObjectId vid in m_pl2d) 
                        { 
                            Vertex2d v2d = m_OpenEntity(vid) as Vertex2d; 
                            if (v2d.VertexType != Vertex2dType.SplineControlVertex) 
                                m_pl.AddVertexAt(index++, new Point2d(v2d.Position.X, v2d.Position.Y), 0, v2d.StartWidth, v2d.EndWidth); 
                        } 
                        m_pl.LayerId = m_pl2d.LayerId;//继承层属性 
                        m_pl.Elevation = m_pl2d.Elevation;//继承高程属性 
                        m_pl.LinetypeId = m_pl2d.LinetypeId;//继承线型属性 
                        m_pl.ColorIndex = m_pl2d.ColorIndex;//继承颜色属性 
                        break; 
                    default: 
                        break; 
                } 
            } 
            return m_pl; 
        } 
        #endregion 
 
    } 
 
}

张威风 · 发表于 2017-5-15 11:53:07

有什么用?????

yaoguen · 发表于 2017-5-23 08:16:30

很实用，多谢楼主分享

yaoguen · 发表于 2017-5-23 16:42:05

试了一下有些实体裁剪不了或者如果图形较大，框外不删除

GANXIZHI2 · 发表于 2018-1-6 14:35:50

谢谢，学习了

cy草木 · 发表于 2018-3-12 23:15:46

学习，感谢版主

账号		自动登录	找回密码
密码			立即注册

[每日一码] C#开发的批量裁剪

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。