[求助]如何获得CAD视图的左下角和右上角的坐标(ObjectARX)

guliande

比如在cad上画了很多图形，然后绘图过程中会用到很多次缩放.我的目标是给一个命令，可以让所有的图形摆放到界面的中心，并且比例合适。
所以，要首先获得所有图形的左下角和右上角的坐标，请问高手如何做到那，谢谢。PS我现在用的是ObjectARX 2007

rongyifei

这个简单，让我帮你写一个！

rongyifei

static void ROYMyTest_Test2(void)
 {
  // Add your code for command ROYMyTest._Test2 here
  ads_name ssName;
  long ssLength;
  if (acedSSGet(_T("A"),NULL,NULL,NULL,ssName)!=RTNORM
   || acedSSLength(ssName,&ssLength)!=RTNORM)
   return;
  AcDbObjectId EntID;
  ads_name eName;
  AcDbEntity *pEnt;
  AcDbExtents extent;
  AcGePoint3d MaxPt,MinPt;
  Adesk::Boolean isFirstSet=Adesk::kTrue;
  for (long i=0;i<ssLength;i++)
  {
   if (acedSSName(ssName,i,eName)!=RTNORM
    || acdbGetObjectId(EntID,eName)!=Acad::eOk
    || acdbOpenAcDbEntity(pEnt,EntID,AcDb::kForRead)!=Acad::eOk)
    continue;
   if (pEnt->getGeomExtents(extent)!=Acad::eOk)
   {
    pEnt->close();
    continue;
   }
   pEnt->close();
   if (isFirstSet)
   {
    MaxPt=extent.maxPoint();
    MinPt=extent.minPoint();
    isFirstSet=Adesk::kFalse;
   }
   else
   {
    if (MaxPt.x<extent.maxPoint().x)
     MaxPt.x=extent.maxPoint().x;
    if (MaxPt.y<extent.maxPoint().y)
     MaxPt.y=extent.maxPoint().y;
    if (extent.minPoint().x<MinPt.x)
     MinPt.x=extent.minPoint().x;
    if (extent.minPoint().y<MinPt.y)
     MinPt.y=extent.minPoint().y;
   }
  }
  acedSSFree(ssName);

  acedCommand(RTSTR,_T("ZOOM"),
   RTSTR,_T("W"),
   RTPOINT,asDblArray(MinPt),
   RTPOINT,asDblArray(MaxPt),
   RTNONE);
 }

rongyifei

以上代码仅适用于CAD2008，仅作参考！

guliande

rongyifei 兄，谢谢啦，我拿回去钻研一下。

guliande

加你为好友，多向你学习。

rongyifei

QQ：1258433045，有空聊聊！

BDYCAD

已阅！

why1025

rongyifei 发表于 2010-6-22 19:52
static void ROYMyTest_Test2(void)&nbsp;{&nbsp;&nbsp;// Add your code for command ROYMyTest._Test2 he ...

HAO好!!!!!!!!!!!!!!!