视口缩放－>寻求帮助！

nym 发表于 2005-11-30 14:24:00

acedCommand(RTSTR, "Zoom", RTSTR, "Window", RTPOINT, dZoomMin,      RTPOINT, dZoomMax, RTNONE);
上面是我用command命令实现的视口缩放的功能，
请问如果不用command命令，该怎么做呢？
寻求帮助，谢谢！！！

王咣生 发表于 2005-11-30 23:08:00

reply

在vba中已经发过了:
void zoomExtents() {  // 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 center 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); }

nym 发表于 2005-12-1 13:53:00

非常感受到谢你，，
因为第一次发错了，所以在ARX里重发了一下，
感谢你两次的回答，

nym 发表于 2005-12-1 14:23:00

帖子相同问题：
  acedCommand(RTSTR , "Zoom", RTSTR, "Extents", RTNONE ); 这个功能如果不用COMMAND命令来实行，
该如何来作呢，，
又一次麻烦您，，，谢谢！！！

王咣生 发表于 2005-12-1 14:41:00

reply

void zoomExtents() {  // 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 center 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); }

nym 发表于 2005-12-1 15:06:00

acdbHostApplicationServices()->workingDatabase()->updateExt(TRUE); 最后的这句话一定要加吗？
我去掉了测试对程序没有影响，
请告知加上这句话的目的，
谢谢！！！

王咣生 发表于 2005-12-1 17:24:00

reply

只是作一次刷新,影响不是很大.

nym 发表于 2005-12-2 16:04:00

发现了一点问题：
我用你教我的方法进行视口缩放跟
用 acedCommand(RTSTR , "Zoom", RTSTR, "Extents", RTNONE ); 进行缩放后的效果不一致，
command命令实现的效果要小一些。
不知道是什么原因？请指教！！！

nym 发表于 2005-12-2 16:21:00

本来想把截图贴上来的，但是说太大了，传不上来，
麻烦你帮忙看一下吧，
就是用你贴的代码将图缩放后图的上下端会接挨着视口，
但是用command命令缩放后，图的上下端与视口之间有一点距离，就是比代码缩放的图略小一些。

王咣生 发表于 2005-12-2 23:32:00

reply

你需要的这么细吗?
如果像你说的,那么有可能Zoom命令对视野显示作了"加工",Zoom Extents让图形紧贴着视口边缘显示不好,就扩大了一些,猜测!

页: [1] 2

明经CAD社区's Archiver