怎样获取当前视口的坐下角坐标和右上角坐标，还有。。。

Taoyimaier

当用了一些pan和zoom命令了，视口变化了，我现在怎样获取当前视口的坐下角和右上角坐标值，还有一个问题，不知道大家碰到没有，当我用vba写的程序时，运行到一句
ss.select acselectsetall,,,gpcode,gpvalue,其中有时候喜欢出错，在命令行显示的是
** That command may not be invoked transparently **
这个提示到底是是什么引起的，但是只要我重新打开一个dwg文件，又好了
然后调试程序时，可能有些选择集操作的问题，又出现了，一直不知道为什么
如果你知道，请告诉我

mccad

VSMAX 系统变量：存储当前视口虚屏的右上角。该值用 UCS 坐标表示。
VSMIN 系统变量：存储当前视口虚屏的左下角。该值用 UCS 坐标表示。

Taoyimaier

居然然有这么好的办法，太令我高兴了（我想是我太水了吧），
那么，你有没有碰到过第二个问题呢，
出现那个提示真是麻烦， 谢谢你又为我解决了一个问题

mccad

有时由于调试第一次时出错，然后在AutoCAD中已经调用了一些命令，这些命令正在进行，然后再进行调试时，就会出现上面的提示。
但有时这些命令好象你也看不到， 所以只能关闭图形再来。
我在2000版中曾经试过这种情况，但在2002或2004版好象还没出现过。

taoyimaier

你告诉给我得两个系统变量vsmax和vsmin好像在一个文档里都不会变啊，我想要的就是，当cad绘图区变化了显示范围（比如用了zoom或pan之后），我想得到这个时候的绘图区的坐下角坐标和右上角坐标，应为我在编程时，有一个选择集是ss.select acselectsetall , , ,gpcode,gpvalue,后面我还要对这个选择集进行判断，去掉里面的大部分图元，这样的话，如果这个图形里的图元太多后，速度就很慢了,所以我想只在当前绘图区查找就可以了，所以要得到select的两个坐标参数，然后换一种选择模式，
如果没有这样的系统变量，用lisp写的话，该如何选择当前绘图区的坐下角坐标和右上角坐标，不知道这次说清楚没有

第二个问题原来你也碰到过，看样子我要装一个高版本的cad了
你网站上的cad2004是不是不能下载啊，总之，我下载了好几次，没成功
谢谢你

mccad

Taoyimaier

是这样子的，我有一个尺寸标注程序，功能是在一个封闭的多边形里点一下，然后这个多边形的各个边的尺寸就用text标注出来了，这样的话，我希望删除这些text时，一下子删除一个封闭多边形里的所有text，而不是删除一个，所以我在标注这个尺寸时，在每一个text里加了扩展数据，就是把当时标注的时间写进了扩展数据，然后又做了一个专门为这个text删除的程序，就是当选择一个这样的text（有时间扩展数据）时，他会找到这个扩展数据，然后在所有实体里找有相同时间扩展数据的实体，找到后删除,
碰到的问题是，当选择所有的实体后，还要判断是否是所需要的text(是否具有相同的时间扩展数据)，这样对每个实体都判断，太慢了，我想只要选择当时绘图区里的实体就够了，但不知道如何获得当时绘图区的两个坐标，程序也给你用一下，加载后，有两个主要函数，tt是标注，ee是删除，代码太长，你没有太大必要认真看，主要是看看功能

[此贴子已经被作者于2003-5-2 13:47:01编辑过]

mccad

Taoyimaier

Taoyimaier