[函数] 天正对象lisp函数-房间

admin1

[code];;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:AreaComputeType(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'AreaComputeType)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:AreaComputeType(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'AreaComputeType value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:AreaUnit(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'AreaUnit)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:AreaUnit(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'AreaUnit value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Code(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Code)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:Code(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'Code value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Conductivity(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Conductivity)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Conductivity2(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Conductivity2)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace<img src="static/image/smiley/default/biggrin.gif" smilieid="3" border="0" alt="" />ispMode(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'DispMode)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace<img src="static/image/smiley/default/biggrin.gif" smilieid="3" border="0" alt="" />ispMode(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'DispMode value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace<img src="static/image/smiley/default/biggrin.gif" smilieid="3" border="0" alt="" />ocument(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Document)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:EntityTransparency(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'EntityTransparency)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:EntityTransparency(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'EntityTransparency value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:ExtDoorArea(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'ExtDoorArea)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:ExtWallArea(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'ExtWallArea)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:ExtWinArea(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'ExtWinArea)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Floor3D(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Floor3D)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:Floor3D(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'Floor3D value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:FloorThickness(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'FloorThickness)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:FloorThickness(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'FloorThickness value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:FloorType(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'FloorType)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:FloorType(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'FloorType value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Handle(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Handle)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:HasExtensionDictionary(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'HasExtensionDictionary)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:HasRoof(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'HasRoof)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:HasRoof(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'HasRoof value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:HatchAngle(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'HatchAngle)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:HatchAngle(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'HatchAngle value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:HatchColor(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'HatchColor)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:HatchColor(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'HatchColor value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:HatchLayer(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'HatchLayer)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:HatchLayer(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'HatchLayer value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:HatchScale(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'HatchScale)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:HatchScale(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'HatchScale value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:HatchStyle(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'HatchStyle)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:HatchStyle(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'HatchStyle value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Height(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Height)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:Height(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'Height value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Hyperlinks(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Hyperlinks)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:InertiaIndex2(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'InertiaIndex2)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Kickboard(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Kickboard)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace<img src="static/image/smiley/default/sweat.gif" smilieid="10" border="0" alt="" />ayer(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Layer)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace<img src="static/image/smiley/default/sweat.gif" smilieid="10" border="0" alt="" />ayer(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'Layer value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace<img src="static/image/smiley/default/sweat.gif" smilieid="10" border="0" alt="" />ayoutRotation(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'LayoutRotation)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace<img src="static/image/smiley/default/sweat.gif" smilieid="10" border="0" alt="" />ayoutRotation(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'LayoutRotation value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace<img src="static/image/smiley/default/sweat.gif" smilieid="10" border="0" alt="" />inetype(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Linetype)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace<img src="static/image/smiley/default/sweat.gif" smilieid="10" border="0" alt="" />inetype(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'Linetype value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace<img src="static/image/smiley/default/sweat.gif" smilieid="10" border="0" alt="" />inetypeScale(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'LinetypeScale)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace<img src="static/image/smiley/default/sweat.gif" smilieid="10" border="0" alt="" />inetypeScale(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'LinetypeScale value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace<img src="static/image/smiley/default/sweat.gif" smilieid="10" border="0" alt="" />ineweight(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Lineweight)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace<img src="static/image/smiley/default/sweat.gif" smilieid="10" border="0" alt="" />ineweight(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'Lineweight value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:MaskFlag(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'MaskFlag)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:MaskFlag(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'MaskFlag value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Material(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Material)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:Material(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'Material value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Name(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Name)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:Name(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'Name value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Name2(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Name2)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:NameType(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'NameType)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:NameType(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'NameType value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:ObjectID(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'ObjectID)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:ObjectID32(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'ObjectID32)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:ObjectName(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'ObjectName)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:OccuArea(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'OccuArea)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:OwnerID(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'OwnerID)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:OwnerID32(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'OwnerID32)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace<img src="static/image/smiley/default/tongue.gif" smilieid="7" border="0" alt="" />erimeter(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Perimeter)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace<img src="static/image/smiley/default/tongue.gif" smilieid="7" border="0" alt="" />lotStyleName(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'PlotStyleName)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace<img src="static/image/smiley/default/tongue.gif" smilieid="7" border="0" alt="" />lotStyleName(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'PlotStyleName value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Scale(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Scale)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:Scale(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'Scale value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:ShadowType(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'ShadowType)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:ShadowType(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'ShadowType value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:ShowArea(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'ShowArea)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:ShowArea(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'ShowArea value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:ShowCode(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'ShowCode)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:ShowCode(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'ShowCode value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:ShowHatch(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'ShowHatch)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:ShowHatch(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'ShowHatch value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:ShowName(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'ShowName)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:ShowName(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'ShowName value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:ShowOutLine(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'ShowOutLine)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:ShowOutLine(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'ShowOutLine value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Structure(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Structure)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:Structure(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'Structure value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Structure2(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Structure2)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:Structure2(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'Structure2 value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:StuccoThickness(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'StuccoThickness)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:StuccoThickness(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'StuccoThickness value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:TextHeight(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'TextHeight)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:TextHeight(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'TextHeight value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:TextHeightArea(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'TextHeightArea)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:TextHeightArea(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'TextHeightArea value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:TextRotation(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'TextRotation)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:TextRotation(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'TextRotation value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:TextStyle(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'TextStyle)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:TextStyle(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'TextStyle value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:TextStyleArea(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'TextStyleArea)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:TextStyleArea(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'TextStyleArea value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:TrueColor(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'TrueColor)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:TrueColor(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'TrueColor value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:UseArea(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'UseArea)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:UseVolume(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'UseVolume)
)


;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:Visible(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'Visible)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:SetTchSpace:Visible(o value)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-put-property o 'Visible value)
)

;;说明:
;;参数<img src="static/image/smiley/default/shocked.gif" smilieid="6" border="0" alt="" />:
;;返回:
(defun Zgx:GetTchSpace:WallSurfArea(o)
  (or
    (eq (type o)'VLA-OBJECT)
    (setq o(vlax-ename->vla-object o))  
  )
  (vlax-get-property o 'WallSurfArea)
)

[/code]