- UID
- 5043
- 积分
- 1347
- 精华
- 贡献
-
- 威望
-
- 活跃度
-
- D豆
-
- 在线时间
- 小时
- 注册时间
- 2002-5-13
- 最后登录
- 1970-1-1
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 LoveArx 于 2013-5-5 01:01 编辑
[sell=5]
[pcode=cpp,true]//
// ObjectARX defined commands, created by Bill Zhang [2003-2-20], DevTech, Autodesk
#include "StdAfx.h"
#include "StdArx.h"
/////////////////////////////////////////////////////////////////////////////////////////
// A utility for regenerating the boundaries of a hatch entity if they are lost.
/////////////////////////////////////////////////////////////////////////////////////////
// append an entity to the current space of AutoCAD database
void addAEntToTheCurrentSpaceAndClose(AcDbEntity* pEnt)
{
AcDbBlockTableRecord *pBlkRec;
AcDbObjectId objID;
acdbOpenObject(pBlkRec, acdbCurDwg()->currentSpaceId(), AcDb::kForWrite);
pBlkRec->appendAcDbEntity (objID, pEnt) ;
pEnt->close();
pBlkRec->close();
}
//-----------------------------------------------------------------------------
// This is command 'RESTOREHATCHBOUNDARY, by Bill Zhang [2003-2-20], DevTech, Autodesk
void BzhRestoreHatchBoundary()
{
#ifdef OARXWIZDEBUG
acutPrintf ("\nOARXWIZDEBUG - BzhRestoreHatchBoundary() called.");
#endif // OARXWIZDEBUG
// TODO: Implement the command
// create a resbuf which is filled with filter conditions.
struct resbuf *filter = acutBuildList(RTDXF0, "HATCH", RTNONE);
ads_name ss;
// ask users to select hatch entities.
int res = acedSSGet(NULL, NULL, NULL, filter, ss);
// release filter resbuf.
acutRelRb (filter);
if( res != RTNORM )
{
acutPrintf("\nNo hatch entities selected!");
return;
}
long length=0l;
acedSSLength (ss, &length);
for(long indexSS=0l; indexSS<length; indexSS++)
{
ads_name eName;
res = acedSSName(ss, indexSS, eName);
if( res != RTNORM )
continue;
AcDbObjectId id;
acdbGetObjectId(id, eName );
AcDbHatch*pHatch=NULL;
acdbOpenObject(pHatch, id, AcDb::kForRead );
if( pHatch == NULL )
continue;
// For each loop, draw the boundary.
int nLoops = pHatch->numLoops();
for( int i=0;i<nLoops; i++ )
{
long loopType;
if( pHatch->loopTypeAt( i ) & AcDbHatch::kPolyline )
{
AcGePoint2dArray vertices;
AcGeDoubleArray bulges;
pHatch->getLoopAt( i, loopType, vertices, bulges );
int nVertices = vertices.length();
AcDbPolyline *pPoly = new AcDbPolyline(nVertices);
for( int vx=0;vx<nVertices;vx++ )
{
double bulge = bulges.length() < nVertices ? 0.0: bulges[vx];
pPoly->addVertexAt( vx, vertices[vx], bulge );
}
// append it to the current space of AutoCAD database
pPoly->setColorIndex(1);
addAEntToTheCurrentSpaceAndClose(pPoly);
}
else
{
AcGePoint2dArray vertices;
AcGeDoubleArray bulges;
AcGeVoidPointerArray edgePtrs;
AcGeIntArray edgeTypes;
pHatch->getLoopAt(i, loopType,edgePtrs, edgeTypes );
for(int j=0; j<edgePtrs.length(); j++)
{
switch (edgeTypes[j]){
case AcDbHatch::kLine:
{
AcGeLineSeg3d *pGeLine3d = (AcGeLineSeg3d*)edgePtrs[j];
AcGePoint3d geP1, geP2;
geP1 = pGeLine3d->startPoint();
geP2 = pGeLine3d->endPoint();
AcDbLine *pLine = new AcDbLine(geP1, geP2);
pLine->setColorIndex(1);
addAEntToTheCurrentSpaceAndClose(pLine);
}
break;
case AcDbHatch::kCirArc:
{
AcGePoint3d geCenter;
double dRadius, dStartAng, dEndAng;
AcGeCircArc3d *pGeArc = (AcGeCircArc3d*)edgePtrs[j];
geCenter = pGeArc->center();
dRadius = pGeArc->radius();
dStartAng = pGeArc->startAng();
dEndAng = pGeArc->endAng();
double dAngDiff;
dAngDiff = fabs( dEndAng - dStartAng - atan(1)*8 );
if( dAngDiff > 1e-5 ) // It's an ARC.
{
AcDbArc *pArc = new AcDbArc(geCenter, dRadius, dStartAng, dEndAng);
pArc->setColorIndex(1);
addAEntToTheCurrentSpaceAndClose(pArc);
}
else // It's a circle.
{
AcGeVector3d geNorm = pGeArc->normal();
AcDbCircle *pCir = new AcDbCircle(geCenter, geNorm, dRadius);
pCir->setColorIndex(1);
addAEntToTheCurrentSpaceAndClose(pCir);
}
}
break;
case AcDbHatch::kEllArc:
{
AcGePoint3d geCenter;
AcGeVector3d geNorm,dMajorAxis, dMinorAxis;
double dMajorRadius, dMinorRadius;
double dStartAng, dEndAng;
AcGeEllipArc3d *pGeEllip = (AcGeEllipArc3d*)edgePtrs[j];
geCenter = pGeEllip->center();
dStartAng = pGeEllip->startAng();
dEndAng = pGeEllip->endAng();
geNorm = pGeEllip->normal();
dMajorAxis = pGeEllip->majorAxis();
dMinorAxis = pGeEllip->minorAxis();
dMajorRadius = pGeEllip->majorRadius();
dMinorRadius = pGeEllip->minorRadius();
AcDbEllipse *pEllip = new AcDbEllipse();
// Note: radiusRatio = dMinorRadius/dMajorRadius (must be within [0, 1])
pEllip->set(geCenter,geNorm,dMajorAxis*dMajorRadius,dMinorRadius/dMajorRadius);
pEllip->setStartParam(dStartAng);
pEllip->setEndParam(dEndAng);
if( pEllip->isNull() == Adesk::kTrue)
{
acutPrintf("\nFailed to create an ellipse.");
break;
}
else
{
pEllip->setColorIndex(1);
addAEntToTheCurrentSpaceAndClose(pEllip);
}
}
break;
case AcDbHatch::kSpline:
{
Adesk::Boolean bIsFixSpline;
AcGePoint3dArray fitPoints;
AcGeTol fitTol;
Adesk::Boolean bTangentsExist;
AcGeVector3d startTangent, endTangent;
int deg;
AcGeNurbCurve3d *pGeSpline=(AcGeNurbCurve3d *)edgePtrs[j];
assert(pGeSpline);
deg = pGeSpline->degree();
bIsFixSpline = pGeSpline->getFitData(fitPoints,
fitTol,
bTangentsExist,
startTangent,
endTangent);
if( bIsFixSpline == Adesk::kTrue )
{
AcDbSpline *pSpline=new AcDbSpline();
pSpline->setFitData(fitPoints,
deg,
fitTol.equalVector(),
startTangent,
endTangent);
if( pSpline->isNull() == Adesk::kTrue)
{
acutPrintf("\nFailed to create a spline.");
break;
}
else
{
pSpline->setColorIndex(1);
addAEntToTheCurrentSpaceAndClose(pSpline);
}
}
else
{
Adesk::Boolean rational,closed,periodic;
AcGePoint3dArray gePoints;
AcGeDoubleArray geWeights;
AcGePoint3d gePoint;
AcGeKnotVector geKnots;
AcGeDoubleArray dKnots;
rational = pGeSpline->isRational();
closed = pGeSpline->isClosed();
periodic = Adesk::kFalse;
for(int k=0; k<pGeSpline->numControlPoints(); k++)
{
gePoints.append(pGeSpline->controlPointAt(k));
}
for(k=0; k<pGeSpline->numWeights(); k++)
{
geWeights.append(pGeSpline->weightAt(k));
}
geKnots = pGeSpline->knots();
for(k=0; k<geKnots.length(); k++)
{
dKnots.append(geKnots[k]);
}
AcDbSpline *pSpline=new AcDbSpline(deg,
rational,
closed,
periodic,
gePoints,
dKnots,
geWeights);
if( pSpline->isNull() == Adesk::kTrue)
{
acutPrintf("\nFailed to create a spline.");
break;
}
else
{
pSpline->setColorIndex(1);
addAEntToTheCurrentSpaceAndClose(pSpline);
}
}
}
break;
default:
break;
}
}
}
}
pHatch->close();
}
// free up the selection set
acedSSFree (ss);
}[/pcode]
[/sell] |
评分
-
查看全部评分
|
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园
( 辽ICP备15016793号 )
窥视卡
雷达卡
已领礼包: 
财富等级: 
发表于 2013-5-5 00:57:41
提升卡
置顶卡
沉默卡
变色卡
千斤顶
发表于 2013-5-5 22:45:42
