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

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 [FilterType][, 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.

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

发表回复

精选推荐