关于选择集的getboundingbox问题！

qflut · 发表于 2008-7-8 22:53:00

我想知道一个选择集中所选对象的最大最小点，但是选择集没有getboundingbox，也不能直接用于copyobjects，于是我用for each把选择集赋给一个acadentity数组，再用copyobjects做成块再参照，获取ptmin和ptmax。然后删除块参照和块。发现在VB里面for each实在太耗时，简直无法忍受。但是好像就是我逐个对象用getboundingbox再对坐标排序也绕不过这个for each。我的需求很简单，就是获取选择集中对象的最大和最小的那两个点坐标。大家有没有好的着可以实现阿！在VB里面不是VBA。谢谢先

fjfhgdwfn · 发表于 2008-7-9 08:15:00

逐个对象用getboundingbox，得到每个对象的最大最小值，直接判断了。不用赋于数组的。只在选择中用一次FOR就可以了。

qflut · 发表于 2008-7-9 11:18:00

这个速度是一样的，如果赋给数组的话，不用逐个getboundingbox，只需要对块参照用一次就可以。

我现在主要想绕过for循环。好郁闷

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