caoyalu 发表于 2014-12-11 11:01:53

怎样知道选择集中是否包含某一实体

有没有类似于 IsInclude(选择集，实体)这样的函数？
如果要自己做子程序的话，我又遇到一个问题：怎样判断两个实体相同？好像不支持
OBJ1=OBJ2这样的判断。
谢谢！

zzyong00 发表于 2014-12-11 18:19:10

OBJ1 is OBJ2判断

wangshuping42 发表于 2014-12-11 23:17:47

可以这样，尝试从选择集中移除某个文件，再看是否出错，假如出错，说明它不在选择集中，反之则在。
选择集RemoveObjects 方法，参数是一个AcadEntity数组，下标从0开始。

wwswwswws 发表于 2014-12-12 09:41:53

每个OBJ都有唯一Handle，你要事先取得这个OBJ的Handle，就可以在选择集中比较了;

cxjzxh 发表于 2014-12-12 20:10:28

ads_ssmember

caoyalu 发表于 2014-12-22 10:10:06

OBJ1 is OBJ2
=============================
谢谢

月牙湾 发表于 2014-12-22 11:38:22

caoyalu 发表于 2014-12-22 10:10 static/image/common/back.gif
OBJ1 is OBJ2
=============================
谢谢

用is吗？？确定？？

万里天 发表于 2016-3-7 16:21:07

可以尝试从选择集中移除那个实体，看是否出错，假如出错，说明它不在选择集中，反之则在。
选择集RemoveObjects 方法，参数是一个AcadEntity数组，下标从0开始。
'从选择集删除某个实体
Public Sub DelEntFromSSet(ByVal ENT As AcadEntity, ByVal SSet As AcadSelectionSet)
    Dim objCollection(0) As AcadEntity
    Set objCollection(0) = ENT
    SSet.RemoveItems objCollection
End Sub
页: [1]
查看完整版本: 怎样知道选择集中是否包含某一实体