Arx常用代码《转》

一    在ARX中禁用AutoCAD的某个命令
  以LINE命令为例，在程序中加入下面的一句即可禁用LINE命令：
acedCommand(RTSTR,  "undefine", 
RTSTR,  "line",
RTNONE);
下面的语句则可恢复LINE命令的定义：
acedCommand(RTSTR,  "redefine", 
RTSTR,  "line",
RTNONE);
二  在对话框中预览DWG文件
使用acdbDisplayPreviewFromDw g函数，具体的方法为：
char  fileName[100];
  strcpy(fileName,  "C:\\test.dwg");
  bool  es;
  HWND  pWnd;
  CFrameWnd  *pFrame  =  (CFrameWnd*)GetDlgItem(IDC_PICTURE); 
    es  =  acdbDisplayPreviewFromDw g(fileName,  pFrame->m_hWnd);
上面的代码将在一个Picture控件中显示指定的图形。
另外，需要包含“dbmain.h”头文件。 
四  获得当前数据库
在ARX编程中，经常需要使用当前数据库，例如需要获得当前图形中设置的文字样式、标注样式等。
要获得当前数据库，都可以直接使用下面的方法：
AcDbTextStyleTable  *pTextStyleTAble;
AcDbObjectId  textstyleId;
textstyleId=acdbHostApplicationServi ces()->workingDatabase()->textstyle();
如果用acadCurDwg来代替acdbHostApplicationServi ces()->workingDatabase()，也能得到同样的结果。
六  在ARX打开文件
在AutoCAD中打开图形，并且显示在图形窗口中，可以使用acedSyncFileOpen()函数。需要注意的是，这个函数只能在单文档模式中工作，
用户可以在AutoCAD“选项”对话框的“系统”选项卡中进行设置，或者在主函数中添加下面的语句：
acrxDynamicLinker->registerAppNotMDIAware(pkt);
具体的函数如下：
//加载模板文件
void  LoadTemplate()
{
  char  fname[50];
  strcpy(fname,"E:\\TMCAD\\TMCADtukuang\\A3.DWG");
 
#ifndef  _ACAD2000
  Acad::ErrorStatuses;   
  es  =  acedSyncFileOpen(fname);
#else 
  acDocManager->appContextOpenDocument(fname);
#endif
}

下面的方法则打开指定位置的DWG文件。
void  OpenDoc(  void  *pData)
{
  AcApDocument*  pDoc  =  acDocManager->curDocument();
  if  (acDocManager->isApplicationContext()) 
  {
    acDocManager->appContextOpenDocument((const  char  *)pData);
  } 
  else
  {
    acutPrintf("\nERROR  To  Open  Doc!\n");
  }
}

//  This  is  command  'OPEN1'
void  ZffOPENopen1()
{
  //  直接打开系统中存在的某个图形文件G:\AutoCAD图形\wen2.dwg
  static  char  pData[]  =  "G:\\AutoCAD图形\\wen2.dwg"; 
acDocManager->executeInApplicationCont ext(OpenDoc,  (void  *)pData);
} 
 
  //    Function  name        :  SetCurLayer
  //    Description                :  设置当前层
  //    Return  type                :  Acad::ErrorStatus 
  //    Argument                  :  const  char*  lpLayerName
  //    Argument                  :  AcDbDatabase*  pDb 
    Acad::ErrorStatus  SetCurLayer(  const      char  *    lpLayerName,  AcDbDatabase  *    pDb      )
    {
        AcDbDatabase  *    pCurDb    =    pDb;
          if    (pCurDb    ==    NULL)
                pCurDb    =    acdbHostApplicationServi ces()  ->  workingDatabase();

        AcDbLayerTableRecordPoin ter  spRecord(lpLayerName,  pCurDb,  AcDb::kForRead);
        Acad::ErrorStatus  es    =    spRecord.openStatus();
          if    (es    ==    Acad::eOk)
            {
                es    =      pCurDb  ->  setClayer(spRecord  ->  objectId());
        } 
          return    es;
} 
 

//功能描述:选择指定图层上的所有实体！

 
  //  函数名称:selectEntityInLayer
  //  函数类型:Acad::ErrorStatus 
  //  返回值:    正常：Acad::eOk
  //  功能描述:选择指定图层上的所有实体！
  //  函数作者:Darcy
  //  创建日期:200X-XX-XX
  //  参数列表:
  //  变量名:nLayerName          变量类型:const  char*                      变量说明:(输入)图层名
  //  变量名:nIDs                      变量类型:AcDbObjectIdArray&        变量说明:(输出)图层中实体的对象标识符集合
 
  Acad::ErrorStatus  selectEntityInLayer(  const      char  *    nLayerName,AcDbObjectIdArray  &    nIDs)
    {
        Acad::ErrorStatus  es    =    Acad::eOk;

        ads_name  ents;
          struct    resbuf    *  rb;
        rb  =  acutNewRb(AcDb::kDxfLayerName);
        rb  ->  restype  =  8  ;
        rb  ->  resval.rstring  =  (  char  *  )nLayerName;
        rb  ->  rbnext  =  NULL;
        acedSSGet(  "  X  "  ,NULL,NULL,rb,ents);
          long    entNums  =  0  ;
        acedSSLength(ents,  &  entNums);
          if    (entNums    ==      0  )
                es    =    Acad::eInvalidInput;
          else 
              {
                  for    (  long    a    =      0  ;  a    <    entNums  ;  a    ++  )
                    {
                        AcDbObjectId    objId;
                        ads_name            ent;
                        acedSSName(ents,a,ent);
                        acdbGetObjectId(objId,  ent);
                        nIDs.append(objId);
                } 
        } 
        acedSSFree(ents);
        acutRelRb(rb);

          return    es;
}           

生成新组
//生成新组（sGroupName）
//追加数组中所有实体到该组中
//组名字  ,      Id数组
int  createGroup(CString  sGroupName,
                                                                      const  AcDbObjectIdArray  *idArr)
{
        AcDbGroup              *pGroup  =  new  AcDbGroup((LPSTR)(LPCTSTR)sGroupName);
        AcDbObjectId          groupObjectId;
        AcDbDictionary    *pGroupDict  =  NULL;

        acdbHostApplicationServi ces()->workingDatabase()
                ->getGroupDictionary(pGroupDict,  AcDb::kForWrite);
        pGroupDict->setAt(sGroupName,  pGroup,  groupObjectId);
        pGroupDict->close();
            pGroup->close();
        acdbOpenObject(pGroup,  groupObjectId,  AcDb::kForWrite);
        for  (int  i  =  0;  i  <  idArr->length();  i++)
        {
                groupObjectId  =  idArr->at(i);
                pGroup->append(groupObjectId);     
        }
        pGroup->close();
        return  TRUE;
}
功能：新建一个图层
参数：LayerName  --  图层名，LayerColor  --  颜色名
返回：图层ID
//==========================================================
AcDbObjectId  CreateNewLayer(CString  LayerName,  AcCmColor  LayerColor)
{
        //  获得当前图形数据库的符号表
        AcDbLayerTable  *pLayerTable;
        acdbHostApplicationServi ces()->workingDatabase()->getSymbolTable(pLayerTable,
                AcDb::kForWrite);
        //  生成新的图层表记录
        AcDbLayerTableRecord  *pLayerTableRecord  =  new  AcDbLayerTableRecord;
        pLayerTableRecord->setName(LayerName);                //  设置图层名
        pLayerTableRecord->setColor(LayerColor);        //  设置图层颜色
        AcDbObjectId  layerId;
        pLayerTable->add(layerId,pLayerTableRecord);
        //  关闭图层表和图层表记录
        pLayerTable->close();
        pLayerTableRecord->close();
        return  layerId;
}

//==========================================================
功能：在指定图层上新建一条直线
参数：见注释
返回：直线ID
//==========================================================
AcDbObjectId  CreateLine(  double  x1,double  y1,double  z1,    //  起点坐标
                                          double  x2,double  y2,double  z2,    //  终点坐标
                                          AcDbObjectId  layer)                                      //  直线所在图层
{
        AcGePoint3d  StartPt(x1,y1,z1);        //  起点
        AcGePoint3d  EndPt(x2,y2,z2);        //  终点
        AcDbLine  *pLine  =  new  AcDbLine(StartPt,EndPt);
        //  获得当前图形数据库的符号表
        AcDbBlockTable  *pBlockTable;
        acdbHostApplicationServi ces()->workingDatabase()->getSymbolTable(pBlockTable,
                AcDb::kForRead);
        //  获得符号表中的模型空间块表记录指针，用于添加对象
        AcDbBlockTableRecord  *pBlockTableRecord;
        pBlockTable->getAt(ACDB_MODEL_SPACE,pBlockTableRecord,AcDb::kForWrite);
        pBlockTable->close();
        //  将直线添加到模型空间块表记录中
        AcDbObjectId  lineId;
        pLine->setLayer(layer,Adesk::kTrue);        //  设置直线所在图层
        pBlockTableRecord->appendAcDbEntity(lineId,pLine);
        //  关闭块表记录指针和直线指针
        pBlockTableRecord->close();
        pLine->close();
        //  返回直线ID号
        return  lineId;
}

//函数名称:getPointAtDistInGeCurve
//函数类型:Acad::ErrorStatus 
//返回值:
//功能描述:返回曲线上距起点某距离值处的点。
//变量名:pGeCurve  变量类型:const  AcGeCurve3d  *  变量说明:
//变量名:dist  变量类型:double  变量说明:
//变量名:point  变量类型:AcGePoint3d&  变量说明:
//备  注:
Acad::ErrorStatus  getPointAtDistInGeCurve(const  AcGeCurve3d  *  pGeCurve,double  dist,AcGePoint3d&  point)
{
Acad::ErrorStatus  es  =  Acad::eOk;

if  (  pGeCurve  !=  NULL  )
{
AcGePoint3d  spt;
double  pa=0.,datumParam=0.;
//距离从起点起算！
Adesk::Boolean  posParamDir=Adesk::kTrue;

pGeCurve->hasStartPoint(spt); 

datumParam  =  pGeCurve->paramOf(spt);;

pa  =  pGeCurve->paramAtLength(
datumParam,
dist,
posParamDir
);

point=pGeCurve->evalPoint(pa);
}
else
es  =  Acad::eInvalidInput;

return  es;
} 
判断点是否在圆弧上

BOOL
IsAtArc(CAD_POINT  firstPt,CAD_POINT  secondPt,
double  radius,double  direct,int  More,CAD_POINT  thePt)

{
CAD_POINT  centerPt,sectionPt;
CAD_POINT  startPt,endPt;
double  startAngle,endAngle,chordAngle,vertAngle;
double  intLine,chordLine;
 
sectionPt.x  =  (firstPt.x  +  secondPt.x)/2;
sectionPt.y  =  (firstPt.y  +  secondPt.y)/2;

chordLine  =  sqrt(  pow(  (secondPt.x-firstPt.x),2  )  +  pow(  (secondPt.y-firstPt.y),2  )  );
intLine  =  sqrt((radius*radius-chordLine*chordLine/4)  );

chordAngle  =  ads_angle(asDblArray(firstPt),asDblArray(secondPt));  //弦线的角度

if(direct>=0)//左偏
{
startPt=firstPt;
endPt=secondPt;
vertAngle=chordAngle+Pai/2;
}
else  if(direct<0)//右偏
{
startPt=secondPt;
endPt=firstPt;
vertAngle=chordAngle-Pai/2;
}

if(More<=0)//小圆弧
{
centerPt.x=sectionPt.x+intLine*cos(vertAngle);
centerPt.y=sectionPt.y+intLine*sin(vertAngle);
}
else//大圆弧
{
centerPt.x=sectionPt.x-intLine*cos(vertAngle);
centerPt.y=sectionPt.y-intLine*sin(vertAngle);
}

if(fabs(centerPt.distanceTo(thePt)-radius)>1.0E-8)
return  FALSE;
startAngle  =  ads_angle(asDblArray(centerPt),asDblArray(startPt)); 
endAngle  =  ads_angle(asDblArray(centerPt),asDblArray(endPt)); 

AcDbArc  *pArc=new