Arx编程对实体的基本操作.doc

/ ObjectARX defined commands, created by 2010-9-30, , #include StdAfx.h#include StdArx.h#include dbents.h#include geassign.h#include dbpl.h#define PI 3.141592653589793238462643383279502884197169399375105820974944592308BOOL AddEntityToDBS(AcDbEntity *pEntity, AcDbObjectId &Id)/获取块表AcDbBlockTable *pBlockTable = NULL;if (acdbHostApplicationServices()-workingDatabase()-getBlockTable(pBlockTable, AcDb:kForRead) != Acad:eOk)return FALSE;/获取模型空间的快表记录AcDbBlockTableRecord *pBlkTabRec = NULL;if (pBlockTable-getAt(ACDB_MODEL_SPACE, pBlkTabRec, AcDb:kForWrite) != Acad:eOk)pBlockTable-close();return FALSE;pBlkTabRec-appendAcDbEntity(Id, pEntity);pEntity-close();pBlockTable-close();pBlkTabRec-close();return TRUE;/-绘制直线-/ This is command CLINE, by 2010-9-30, , void EICADDrawCLine()#ifdef OARXWIZDEBUGacutPrintf (nOARXWIZDEBUG - EICADDrawCLine() called.);#endif / OARXWIZDEBUG/ TODO: Implement the commandads_point pt0;ads_point pt;AcDbObjectId EntId;if (ads_getpoint(NULL, _T(n请指定起始点：), pt0) !=RTNORM) return;if (ads_getpoint(pt0, _T(n请指定终点：), pt) != RTNORM) return;AcDbLine *pLine = new AcDbLine(asPnt3d(pt0), asPnt3d(pt);AddEntityToDBS(pLine, EntId);pLine-close();/-编辑直线起点-/ This is command EDITLSTARTPOINT, by 2010-9-30, , void EICADDRAWEditlstartpoint()#ifdef OARXWIZDEBUGacutPrintf (nOARXWIZDEBUG - EICADDRAWEditlstartpoint() called.);#endif / OARXWIZDEBUG/ TODO: Implement the commandads_point pt0;ads_point pt;ads_name Ent;AcDbObjectId EntId;AcDbLine *pLine = NULL;if (ads_entsel(_T(n请选择对象：), Ent, pt0) != RTNORM) return;if (ads_getpoint(NULL, _T(n请选择起点：), pt) != RTNORM) return;if (acdbGetObjectId(EntId, Ent) != Acad:eOk) return;if (acdbOpenObject(pLine, EntId, AcDb:kForWrite) != Acad:eOk) return;pLine-setStartPoint(asPnt3d(pt);pLine-close();/-编辑直线终点-/ This is command EDITLENDPOINT, by 2010-9-30, , void EICADDRAWeditlendpoint()#ifdef OARXWIZDEBUGacutPrintf (nOARXWIZDEBUG - EICADDRAWeditlendpoint() called.);#endif / OARXWIZDEBUG/ TODO: Implement the commandads_point pt0;ads_point pt;ads_name Ent;AcDbObjectId EntId;AcDbLine *pLine = NULL;if (ads_entsel(_T(n请选择对象：), Ent, pt0) != RTNORM) return;if (ads_getpoint(NULL, _T(n请选择终点：), pt) != RTNORM) return;if (acdbGetObjectId(EntId, Ent) != Acad:eOk) return;if (acdbOpenObject(pLine, EntId, AcDb:kForWrite) != Acad:eOk) return;pLine-setEndPoint(asPnt3d(pt);pLine-close();/-绘制多段线-/ This is command CPLINE, by 2010-9-30, , void EICADDRAWCPLine()#ifdef OARXWIZDEBUGacutPrintf (nOARXWIZDEBUG - EICADDRAWCPLine() called.);#endif / OARXWIZDEBUG/ TODO: Implement the commandads_point pt0 = 0.0;ads_point pt = 0.0;AcDbObjectId EntId;AcGePoint2d Gpt2d;AcDbPolyline *pPLine = new AcDbPolyline();if (ads_getpoint(NULL, _T(n请指定起始点：), pt0) != RTNORM) return;Gpt2d.set(pt0X, pt0Y);if (pPLine-addVertexAt(0, Gpt2d) != Acad:eOk)delete pPLine;return;AddEntityToDBS(pPLine, EntId);pPLine = NULL;while (ads_getpoint(pt0, _T(n请指定下一个点：), pt) = RTNORM)Gpt2d.set(ptX, ptY);pt0X = ptX;pt0Y = ptY;if (acdbOpenObject(pPLine, EntId, AcDb:kForWrite) != Acad:eOk) return;if (pPLine-addVertexAt(pPLine-numVerts(), Gpt2d) != Acad:eOk)return;pPLine-close();AddEntityToDBS(pPLine, EntId);pPLine-close();/-绘制圆（用户输入圆心和半径画圆）-/ This is command CCIRCLE, by 2010-9-30, , void EICADDrawCCircle()#ifdef OARXWIZDEBUGacutPrintf (nOARXWIZDEBUG - EICADDrawCCircle() called.);#endif / OARXWIZDEBUG/ TODO: Implement the commandads_point pt;ads_real pr;AcDbObjectId EntId;if (ads_getpoint(NULL, _T(n请指定圆心：), pt) != RTNORM) return;if (ads_getreal(_T(n请输入半径：), &pr) != RTNORM) return;AcDbCircle *pCircle = new AcDbCircle(asPnt3d(pt), AcGeVector3d(0.0, 0.0, 1.0), pr);pCircle-setColorIndex(4);AddEntityToDBS(pCircle, EntId);pCircle-close();/-编辑圆心-/ This is command EDITCCENTER, by 2010-9-30, , void EICADDRAWEditCCenter()#ifdef OARXWIZDEBUGacutPrintf (nOARXWIZDEBUG - EICADDRAWEditCCenter() called.);#endif / OARXWIZDEBUG/ TODO: Implement the commandads_point pt;ads_point pt0;ads_name Ent;AcDbObjectId EntId;if (ads_entsel(_T(n请选择对象：), Ent, pt0) != RTNORM) return;if (ads_getpoint(NULL, _T(n请选择圆心位置：), pt) != RTNORM) return;AcDbCircle *pCircle = NULL;if (acdbGetObjectId(EntId, Ent) != Acad:eOk) return;if (acdbOpenObject(pCircle, EntId, AcDb:kForWrite) != Acad:eOk) return;pCircle-setCenter(asPnt3d(pt);pCircle-close();/-编辑圆半径-/ This is command EDITCRADIUS, by 2010-9-30, , void EICADDRAWEditCRadius()#ifdef OARXWIZDEBUGacutPrintf (nOARXWIZDEBUG - EICADDRAWEditCRadius() called.);#endif / OARXWIZDEBUG/ TODO: Implement the commandads_point pt;ads_name Ent;ads_real pr;AcDbObjectId EntId;AcDbCircle *pCircle = NULL;if (ads_entsel(_T(n请选择对象：), Ent, pt) != RTNORM) return;if (ads_getreal(_T(n请指定半径：), &pr) != RTNORM) return;if (acdbGetObjectId(EntId, Ent) != Acad:eOk) return;if (acdbOpenObject(pCircle, EntId, AcDb:kForWrite) != Acad:eOk) return;pCircle-setRadius(pr);pCircle-close();/-编辑单行文本内容-/ This is command EDITTEXT, by 2010-9-30, , void EICADDRAWEditText()#ifdef OARXWIZDEBUGacutPrintf (nOARXWIZDEBUG - EICADDRAWEditText() called.);#endif / OARXWIZDEBUG/ TODO: Implement the commandads_point pt0;ads_name Ent;char pt200;AcDbObjectId EntId;AcDbText *PText = NULL;if (ads_entsel(_T(n请选择对象：), Ent, pt0) != RTNORM) return; if (ads_getstring(1, _T(n请输入内容：), pt) != RTNORM) return;if (acdbGetObjectId(EntId, Ent) != Acad:eOk) return;if (acdbOpenObject(PText, EntId, AcDb:kForWrite) != Acad:eOk) return;PText-setTextString(pt);PText-setColorIndex(2);PText-close();/-插入块参照-/ This is command CBLKREF, by 2010-9-30, , void EICADDrawCBlkRef()#ifdef OARXWIZDEBUGacutPrintf (nOARXWIZDEBUG - EICADDrawCBlkRef() called.);#endif / OARXWIZDEBUG/ TODO: Implement the commandAcDbBlockTable *pBlockTable = NULL;if (acdbHostApplicationServices()-workingDatabase()-getBlockTable(pBlockTable, AcDb:kForRead) != Acad:eOk)return;AcDbBlockTableRecord *pBlkTblRec = NULL;if (pBlockTable-getAt(_T(zfm), pBlkTblRec, AcDb:kForRead) != Acad:eOk)pBlockTable-close();return;AcDbObjectId BlkRefId = pBlkTblRec-objectId();AcDbObjectId EntId;AcDbBloc