天正墙体图元表里的各项子表都是啥意思啊

1404073417

((-1 . <图元名: 7ff44c74b610>)
(0 . "TCH_WALL")
(330 . <图元名: 7ff44cb3d9f0>)
(5 . "1FE1")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "WALL")
(100 . "TDbCurveEntity")
(46 . 0.0)
(47 . 100.0)
(68 . 0)
(100 . "TDbWall")
(38 . 0.0)
(39 . 3000.0)
(300 . "MwA3ADkAOAA4ADIALAAzADgAMwA0ADUANAAsAC0AMgA3ADYANQA1ADAALAAtADIANwA2ADUANQAwACwAMAAsADAALAA3ADUALAA3ADUA")
(42 . 80.08)
(148 . 0.0)
(149 . 3000.0)
(50 . 0.0)
(73 . 0)
(74 . 60)
(75 . 0)
(90 . 0)
(76 . 0)
(411 . "PUB_HATCH")
(412 . "SURFACE")
(413 . "0")
(414 . "0")
(1 . "") (2 . ""))
命令:

1404073417

以下是墙体的属性及方法：
IComWall: IComWall Interface
;特性值:
;   Application (RO) = #<VLA-OBJECT IAcadApplication 00007ff7ed253f10>
;   AreaRatio (RO) = 0.0
;   BottomFace = "无"
;   Conductivity (RO) = 0.0
;   Document (RO) = #<VLA-OBJECT IAcadDocument 000001bbe0ad5288>
;   Elevation = 0.0
;   EndClose = "否"
;   EntityTransparency = "ByLayer"
;   EnUsage = "内墙"
;   Handle (RO) = "20D3"
;   HasExtensionDictionary (RO) = 0
;   HatchLayer = "PUB_HATCH"
;   Height = 3000.0
;   HideLabel = "是"
;   HoleArea (RO) = "0.00"
;   HoleVolume (RO) = "0.000"
;   Hyperlinks (RO) = #<VLA-OBJECT IAcadHyperlinks 000001bbe651ade8>
;   InertiaIndex (RO) = 0.0
;   Insulate = "无"
;   InsulateClose = "无"
;   InsuThick = 80.0
;   IOFeature = "双内"
;   IsArc (RO) = "直墙"
;   IsExternal (RO) = "内墙"
;   Label = ""
;   Layer = "WALL"
;   LayoutRotation = 0.0
;   LeftInsuThick = 80.0
;   LeftLayer = "0"
;   LeftSpace (RO) = 发生意外。
;   LeftWidth = 60.0
;   Linetype = "ByLayer"
;   LinetypeScale = 1.0
;   Lineweight = -1
;   LSurfaceArea (RO) = "10.10"
;   Material = "ByLayer"
;   ObjectID (RO) = 44
;   ObjectName (RO) = "TDbWall"
;   OwnerID (RO) = 42
;   PlotStyleName = "ByLayer"
;   Radius = 0.0
;   RightInsuThick = 80.0
;   RightLayer = "0"
;   RightSpace (RO) = 发生意外。
;   RightWidth = 60.0
;   RSurfaceArea (RO) = "10.10"
;   Scale = 100.0
;   ShadowType = "投射和接收阴影"
;   StemInsulate = "无"
;   StemInsulateThick = 100.0
;   Structure = " (缺省)"
;   StruHeight = 3000.0
;   StruIsArc (RO) = "直墙"
;   Style = "钢筋砼"
;   SurfLayer = "SURFACE"
;   TextHeight = "3.5"
;   TextStyle = "_TCH_ASD"
;   TopFace = "无"
;   TotalWidth (RO) = 120.0
;   TrueColor = #<VLA-OBJECT IAcadAcCmColor 000001bbe65194c0>
;   Usage = "内墙"
;   Visible = -1
;   Volume (RO) = "1.212"
;支持的方法:
;   ArrayPolar (3)
;   ArrayRectangular (6)
;   Copy ()
;   Delete ()
;   GetBoundingBox (2)
;   GetExtensionDictionary ()
;   GetXData (3)
;   Highlight (1)
;   IntersectWith (2)
;   Mirror (2)
;   Mirror3D (3)
;   Move (2)
;   Rotate (2)
;   Rotate3D (3)
;   ScaleEntity (2)
;   SetXData (2)
;   TransformBy (1)
;   Update ()

vitalgg

((-1 . <图元名: 7ff44c74b610>)
(0 . "TCH_WALL")  
(330 . <图元名: 7ff44cb3d9f0>)
(5 . "1FE1")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "WALL")   ;; 图层
(100 . "TDbCurveEntity")
(46 . 0.0)
(47 . 100.0)  ;; 左/右厚度
(68 . 0)
(100 . "TDbWall")
(38 . 0.0)
(39 . 3000.0) ;; 高度
(300 . "MwA3ADkAOAA4ADIALAAzADgAMwA0ADUANAAsAC0AMgA3ADYANQA1ADAALAAtADIANwA2ADUANQAwACwAMAAsADAALAA3ADUALAA3ADUA") ;; 见楼上
(42 . 80.08) ;; 左右保温厚度，都是 80
(148 . 0.0)
(149 . 3000.0) ;; 墙高
(50 . 0.0)
(73 . 0)
(74 . 60)
(75 . 0)
(90 . 0)
(76 . 0)
(411 . "PUB_HATCH")
(412 . "SURFACE")
(413 . "0")
(414 . "0")
(1 . "") (2 . ""))

陨落

物语心听 发表于 2022-2-16 16:03
379882,-起点X坐标
383454,-端点X坐标
-276550,-起点Y坐标

正解，前4个数字分别是起点x，端点x,起点y，终点y。你说的重复，是因为y坐标一样。
经过测试，发现还有个问题，当坐标比较大的时候，这一串字符表达的是科学计数法，如下所示：
"3.09328%+006,3.09888e+006,1.15625e+006,1.15625%+006,0,0,100,100"
这就很尴尬了，虽然提供了墙的坐标接口，但是你不敢去用，因为精度是不够的。。。。

vitalgg

组码 300 的解码结果：
(l2s (vl-remove 0 (base64:decode "MwA3ADkAOAA4ADIALAAzADgAMwA0ADUANAAsAC0AMgA3ADYANQA1ADAALAAtADIANwA2ADUANQAwACwAMAAsADAALAA3ADUALAA3ADUA")))
=>
"379882,383454,-276550,-276550,0,0,75,75"

看起来是个坐标。

物语心听

vitalgg 发表于 2022-2-15 16:16
组码 300 的解码结果：
(l2s (vl-remove 0 (base64:decode "MwA3ADkAOAA4ADIALAAzADgAMwA0ADUANAAsAC0AMgA ...

379882,-起点X坐标
383454,-端点X坐标
-276550,-起点Y坐标
-276550,-起点Y坐标（不知为何数据重复）
0,
0,
75,-左侧墙体厚度
75,-右侧墙体厚度

天正的一些端口隐藏太深，期待高手解答。

1404073417

vitalgg 发表于 2022-2-15 16:21
((-1 . )
(0 . "TCH_WALL")  
(330 . )

谢谢你谢谢你！！！

1404073417

物语心听 发表于 2022-2-16 16:03
379882,-起点X坐标
383454,-端点X坐标
-276550,-起点Y坐标

谢谢你谢谢你！我昨天研究了一下，用activeX访问墙体属性获得的是未加密的全属性列表，可以通过vlax-Put对其进行修改

brainstorm

http://www.mjtd.com/forum.php?mod=viewthread&tid=184454&mobile=2

brainstorm

搜索天正对象 我写了一堆

陨落

vitalgg 发表于 2022-2-15 16:16
组码 300 的解码结果：
(l2s (vl-remove 0 (base64:decode "MwA3ADkAOAA4ADIALAAzADgAMwA0ADUANAAsAC0AMgA ...

请问base64:decode函数能否提供一下啊？