模拟ZOOM命令的ARX代码

newer · 发表于 2017-1-24 12:23:39

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

////////////////////////////////////////////////////////////////////////////
//
// This is command 'ZOOMEXT, by Fenton Webb [Apr/17/2002], DevTech, Autodesk
void asdkzoomExt()
{
        // get the extents of the drawing
        AcDbViewTableRecord view;
        AcGePoint3d max =
                acdbHostApplicationServices()->workingDatabase()->extmax(),
                min = acdbHostApplicationServices()->workingDatabase()->extmin();

        AcGePoint2d max_2d (max, max);
        AcGePoint2d min_2d (min, min);
        // now set the view centre point
        view.setCenterPoint (min_2d + (max_2d - min_2d) / 2.0);
        // now height and width of view
        view.setHeight(max_2d - min_2d);
        view.setWidth (max_2d - min_2d);
        // set the view
        acedSetCurrentView (&view, NULL);
        // updates the extents
        acdbHostApplicationServices()->workingDatabase()->updateExt(TRUE);
}

////////////////////////////////////////////////////////////////////////////
//
// This is command 'ZOOMWIN, by Fenton Webb [Apr/17/2002], DevTech, Autodesk
void asdkzoomWin()
{
        AcGePoint3d max, min;
        // get the window coords
        int res = acedGetPoint (NULL, "\nPick zoom window pnt : ",
                asDblArray(min));
        // if ok
        if (res == RTNORM)
        {
                res = acedGetCorner (asDblArray(min), "\nPick other corner : ",
                        asDblArray(max));
                // get the extents of the drawing
                AcDbViewTableRecord view;

                AcGePoint2d max_2d (max, max);
                AcGePoint2d min_2d (min, min);
                // now set the view centre point
                view.setCenterPoint (min_2d + (max_2d - min_2d) / 2.0);
                // now height and width of view
                view.setHeight(max_2d - min_2d);
                view.setWidth (max_2d - min_2d);
                // set the view
                acedSetCurrentView (&view, NULL);
                // updates the extents
                acdbHostApplicationServices()->workingDatabase()->updateExt(TRUE);
        }
}

qqqincccken · 发表于 2017-1-25 00:21:16

謝謝版主的提供,來學習一下!!

330774521lhq · 发表于 2017-1-28 08:38:13

啥也不说了，感谢楼主分享哇！

330774521lhq · 发表于 2017-1-29 09:26:21

正需要，支持楼主大人了！

28952996 · 发表于 2017-1-29 09:33:14

感觉很有用，已经用到了

anwil · 发表于 2017-1-30 20:40:31

好资料，学习了。

liuzpzp007 · 发表于 2017-2-13 11:10:44

vs2005下测试有点问题，主要是参数问题，改了一下：
void  asdkzoomExt()
{
      //get the extents of the drawing
      AcDbViewTableRecord view;
      AcGePoint3d max =
            acdbHostApplicationServices()->workingDatabase()->extmax(),
            min = acdbHostApplicationServices()->workingDatabase()->extmin();

      AcGePoint2d max_2d (max.x , max.y );
      AcGePoint2d min_2d (min.x , min.y );
      // now set the view centre point
      view.setCenterPoint (min_2d + (max_2d - min_2d) / 2.0);
      // now height and width of view
      view.setHeight(max_2d.y  - min_2d.y );
      view.setWidth (max_2d.x  - min_2d.x );
      // set the view
      acedSetCurrentView (&view, NULL);
      // updates the extents
      acdbHostApplicationServices()->workingDatabase()->updateExt(TRUE);
}

// This is command 'ZOOMWIN, by Fenton Webb [Apr/17/2002], DevTech, Autodesk
void  asdkzoomWin()
{
      AcGePoint3d max, min;
      // get the window coords
      int res = acedGetPoint (NULL, L"\nPick zoom window pnt : ",asDblArray(min));
      // if ok
      if (res == RTNORM)
      {
            res = acedGetCorner (asDblArray(min), L"\nPick other corner : ",asDblArray(max));
            // get the extents of the drawing
            AcDbViewTableRecord view;

            AcGePoint2d max_2d (max.x , max.y );
            AcGePoint2d min_2d (min.x , min.y );
            // now set the view centre point
            view.setCenterPoint (min_2d + (max_2d - min_2d) / 2.0);
            // now height and width of view
            view.setHeight(max_2d.y  - min_2d.y );
            view.setWidth (max_2d.x  - min_2d.x );
            // set the view
            acedSetCurrentView (&view, NULL);
            // updates the extents
            acdbHostApplicationServices()->workingDatabase()->updateExt(TRUE);
      }
}

lhg · 发表于 2017-3-5 21:08:30

啥也不说了，感谢楼主分享哇！

1121443108qaz · 发表于 2018-7-7 11:52:19

这个好，恰好需要

1121443108qaz · 发表于 2018-7-9 00:13:54

版主，我没明年为什么为updateext，不要最后一个updateext有没有什么影响。我看手册里updateext会遍历所有对象再求ext，对象一多比如有几十万感觉影响速度啊

账号		自动登录	找回密码
密码			立即注册

[每日一码] 模拟ZOOM命令的ARX代码

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

浏览过的版块