选择集过滤器的图元类型问题

bingdianfeishui · 发表于 2011-5-15 20:47:36

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

x

本帖最后由 bingdianfeishui 于 2011-5-15 22:07 编辑

设置选择器过滤器时，想过滤转角标注、多行文字、和块，代码段如下

. @: a& N/ c Q
Sub myss()
' w- b1 k! P' P9 u: E" V; `1 w
Dim myslt As AcadSelectionSet
# E8 w6 R1 _$ i8 u
Dim Filtertype(0 To 4) As Integer, Filterdata As Variant
3 k% a* N' o: O# C
Set myslt = ThisDrawing.SelectionSets.Add("myslt"
/ Z/ x% }, h7 H$ T
Filtertype(0) = -4: Filtertype(1) = 0: Filtertype(2) = 0: Filtertype(3) = 0: Filtertype(4) = -4
/ O6 S( j3 G1 y* L
Filterdata = Array("<OR", "RotatedDimension", "Insert", "MText", "OR>". \: ]: T& D; @& m5 r
myslt.SelectOnScreen Filtertype, Filterdata$ u2 h. d9 O0 E& H& C. z
End Sub

复制代码

不能选取转角标注……

请教各位高手，转角标注的图元类型用什么表示啊？？有没有什么方法或函数能获得图元的类型？？在网上查到一个object.entityname的方法不好用，“RotatedDimension”就是用entityname得出来的。
不甚感激

bingdianfeishui · 发表于 2011-5-15 22:06:43

试出来了，原来标注的图元类型都是Dimension……
有没有什么方法或函数能获得图元的类型？？求解答
entitytype得到的是数字，有没有对应表格？

woaishuijia · 发表于 2011-5-15 23:20:28

一.论坛有网友上传的一本书,名字叫《AutoLISP&DCL基础篇》,该书的附录中有对象名和群码.
二.新建一个CAD文档,只在模型空间画一个你想要知道的对象,把无关内容都清理掉,另存为DXF文件,用WINDOWS记事本打开,查找"ENTITIES",在它下面的0下面的就是

bingdianfeishui · 发表于 2011-5-18 23:25:14

又学会了一招~谢谢版主

agoodlyman · 发表于 2013-1-7 22:27:39

这是什么啊

:doubt::doubt:

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

通知