autocad.net 画多段线_2021年1月1日 AutoCAD.Net/C#.Net QQ群:193522571改变多段线区直

代码：

#include "StdAfx.h"

#include "StdArx.h"

#include

#include "..\..\Common\Others\ConvertUtil.h"

#include

#include "..\..\Common\Entity\ArcUtil.h"

#include "..\..\Common\Document\DwgDatabaseUtil.h"

#include

#include

void ZffMyProjectchangeline()

{

ads_name polyLinename;

ads_point pnt;

if (acedEntSel("\n请选择多段线的条直线段!",polyLinename,pnt)!=RTNORM)

{

return;

}

AcDbObjectId polyLineId;

acdbGetObjectId(polyLineId,polyLinename);

AcDbEntity *pEnt=NULL;

acdbOpenObject(pEnt,polyLineId,AcDb::kForWrite);

if (pEnt->isKindOf(AcDbPolyline::desc()))

{

AcDbPolyline *pPolyline=AcDbPolyline::cast(pEnt);

pEnt->close();

int vtnum=pPolyline->numVerts();

AcGePoint3dArray pts;

AcGePoint3d pt;

for(int i=0; i

{

pPolyline->getPointAt(i, pt);

pts.append(pt);

}

AcDbVoidPtrArray curves;

pPolyline->getSplitCurves(pts,curves);

bool nRb=true;

for (i=0;i

{

AcDbCurve *pCurve=static_cast(curves[i]);

if (nRb)

{

AcGeLine2d geLine;

AcGePoint3d pt1,pt2;

pCurve->getStartPoint(pt1);

pCurve->getEndPoint(pt2);

AcGePoint2d pt12d,pt22d,pnt2d,pt2d;

ads_point pt;

AcGePoint3d ptOnArc;

pt12d=CConvertUtil::ToPoint2d(pt1);

pt22d=CConvertUtil::ToPoint2d(pt2);

pnt2d=CConvertUtil::ToPoint2d(asPnt3d(pnt));

geLine.set(pt12d,pt22d);

double tol =1;

if (geLine.distanceTo(pnt2d)

{

nRb=false;

delete pCurve;

pCurve->close();

acedGetPoint(NULL,"\n输入一个点:",pt);

pt2d=CConvertUtil::ToPoint2d(asPnt3d(pt));

AcGeCircArc2d geArc(pt12d, pt2d, pt22d);

AcGePoint2d ptCenter = geArc.center();

double radius = geArc.radius();

AcGeVector2d vecStart(pt12d.x - ptCenter.x, pt12d.y - ptCenter.y);

AcGeVector2d vecEnd(pt22d.x - ptCenter.x, pt22d.y - ptCenter.y);

double startAngle = vecStart.angle();

double endAngle = vecEnd.angle();

AcDbArc *pArc=new AcDbArc(CConvertUtil::ToPoint3d(ptCenter), radius, startAngle, endAngle);

pArc->getClosestPointTo(asPnt3d(pt),ptOnArc);

if (CConvertUtil::ToPoint2d(ptOnArc).distanceTo(pt2d)

{

CDwgDatabaseUtil::PostToModelSpace(pArc);

}

else

{

AcDbArc *pArc2=new AcDbArc(CConvertUtil::ToPoint3d(ptCenter),radius,endAngle,startAngle);

CDwgDatabaseUtil::PostToModelSpace(pArc2);

delete pArc;

}

continue;

}

}

CDwgDatabaseUtil::PostToModelSpace(pCurve);

pCurve->close();

}

acdbOpenObject(pPolyline,polyLineId,AcDb::kForWrite);

pPolyline->erase();

pPolyline->close();

}

pEnt->close();

}