list命令可以看到数据,但在lisp查询不到,你们遇到过吗?
比如 文字0: DN25 文字1: DN50 这两个信息li LIST
选择对象: 找到 1 个
选择对象:
DXF名称: TCH_PIPEMULTDIM
对象句柄: 3B36E
图层: DIM-暖回水
颜色: 随层
比例: 100
对象类型: 多管标注
文字0: DN25
文字1: DN50
文字高度: 3.5P
文字样式: _THVAC_PIPEDN
选择对象: ((-1 . <图元名: 7ffff9c2860>) (0 . "TCH_PIPEMULTDIM") (330 . <图元名:
7ffffb05820>) (5 . "3B36E") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 .
"DIM-暖回水") (100 . "TDbEntity") (46 . -9.02833e-013) (47 . 100.0) (68 . 1) (100
. "TDbSymbWithText") (7 . "_THVAC_PIPEDN") (40 . 3.5) (52 . 0.0) (410 .
"HVAC_TH_TEXT") (100 . "TDbPipeMultDim") (10 -1.56141e+006 578503.0 0.0) (11
-1.56141e+006 579534.0 0.0) (41 . 8.28483))
选择对象: ; IComPipeMultDim: IComPipeMultDim Interface
;特性值:
; Application (RO) = #<VLA-OBJECT IAcadApplication 0000000140947198>
; Document (RO) = #<VLA-OBJECT IAcadDocument 000000002b221010>
; Handle (RO) = "3B36E"
; HasExtensionDictionary (RO) = 0
; Height = 3.5
; Hyperlinks (RO) = #<VLA-OBJECT IAcadHyperlinks 00000000553f1ed8>
; Layer = "DIM-暖回水"
; Linetype = "BYLAYER"
; LinetypeScale = 1.0
; Lineweight = -1
; LRotation = -5.17285e-011
; Material = "ByLayer"
; MultDimStyle = "斜线标识"
; ObjectID (RO) = 49
; ObjectID32 (RO) = 49
; ObjectName (RO) = "TDbPipeMultDim"
; OwnerID (RO) = 48
; OwnerID32 (RO) = 48
; PlotStyleName = "ByLayer"
; PScale = 100.0
; TextColor = 7
; TextStyle = "_THVAC_PIPEDN"
; TrueColor = #<VLA-OBJECT IAcadAcCmColor 00000000553f2230>
; Visible = -1
T
自己顶一下 真的无解吗? 天正的破东西,找天正 要是能找他们解决就好了,只能求救论坛各位了 原来可以提取,被人告了以后查不到了 好吧,现在只能暂时停止了,原想做一个标注及修改管径的命令,单键选择管径值,鼠标对管线标注或对管径修改,用户可以实现最少操作
页:
[1]