neteasy 发表于 2004-3-25 21:33:00

[求助]如何只选择屏幕上的圆弧和线？

用选择集的SelectOnScreen方法，如何过滤其它元素，而只选择线和圆弧？

莫名 发表于 2004-3-25 21:50:00

后面加过滤：SelectOnScreen FilterType,FilterData
使用过滤器请参考以前发表的帖子。

zzp-2000 发表于 2005-1-18 08:47:00

组码是0

aoaoen 发表于 2005-7-4 17:40:00

可以参考下面的源码
' ※ 选择对象并生成对象表
Dim Selects As AcadSelectionSet
Dim FType(3) As Integer                                                                       ' ※ 选择过滤器的类型代码
Dim FData(3) As Variant                                                                       ' ※ 选择过滤器的值
' ※ 给定选择过滤器类型代码
FType(0) = -4                                                                                                                                                       ' ※ 条件组合码
FType(1) = 0
FType(2) = 0                                                                                                                                                               
FType(3) = -4                                                                                                                                                       ' ※ 条件组合码
' ※ 给定选择过滤器值为可以生成面域的图元类型
FData(0) = ""                                                                                                                                                              ' ※ 类型集合终点
' ※ 选择图元
Set Selects = ThisDrawing.SelectionSets.Add("Objs")
Selects.SelectOnScreen FType, FData

兰州人 发表于 2006-9-8 15:29:00

object.SelectOnScreen [, FilterData]
FilterType
Integer; input-only; optional
A DXF group code specifying the type of filter to use
FilterData
Variant; input-only; optional
The value to filter on.
页: [1]
查看完整版本: [求助]如何只选择屏幕上的圆弧和线？