etg198 发表于 2014-12-3 23:32:16

怎么样获取天正暖通风管的标注值？

如题，工作中，经常要录入风管大小到EXCEL中，两个程序间来回切换，再手工录入效率太低，请教各位大虾，怎么样获取天正暖通风管的标注值？另外，是否可以将取得的数值再输出到EXCEL表格中呢？谢谢！

cdma2546 发表于 2014-12-4 07:57:12

把图转成t3 传上来会方便别人帮你解决问题...

print1985 发表于 2014-12-4 10:06:30

;获取天正风管尺寸标注
(defun c:fg ( / e ob s)
(if (setq e (car (nentsel "\n请选择风管尺寸标注：")))
    (progn
      (setq ob (vlax-ename->vla-object e)
                s (vlax-get-property ob 'Hvac_S1) ;风管尺寸，但是结尾多了“|||”(风管“特性”内容如此)
      )
      (princ s)
    )
)
(princ)
)天正暖通8.5测试的 我能力有限 只能提供这些了
天正有材料统计功能 为什么不用？

etg198 发表于 2014-12-4 22:16:27

print1985 发表于 2014-12-4 10:06 static/image/common/back.gif
天正暖通8.5测试的 我能力有限 只能提供这些了
天正有材料统计功能 为什么不用？

谢谢，材料统计可能不能达到我要的目的，我是想统计风管上的消声器，要对应每台机组，统计功能是所有同类材料集合在一起，不能区别哪台机组的

etg198 发表于 2014-12-5 11:50:19

print1985 发表于 2014-12-4 10:06 static/image/common/back.gif
天正暖通8.5测试的 我能力有限 只能提供这些了
天正有材料统计功能 为什么不用？

请问可以直接点风管获取风管的高度和宽度吗？

而不是点选已经标注好的风管值，谢谢！

print1985 发表于 2014-12-5 23:13:04

本帖最后由 print1985 于 2014-12-5 23:14 编辑

;获取天正风管尺寸
(defun c:fg ( / e ob w h)
(if (setq e (car (nentsel "\n请选择风管")))
    (progn
      (setq ob (vlax-ename->vla-object e)
            w (vlax-get-property ob 'Hvac_R4) ;宽度
            h (vlax-get-property ob 'Hvac_R3) ;高度
      )
      (princ (strcat "\n风管尺寸：" (rtos w 2) "×" (rtos h 2)))
    )
)
(princ)
)

jun353835273 发表于 2016-8-3 11:01:29

非常好   

etg198 发表于 2021-1-8 12:14:50

print1985 发表于 2014-12-5 23:13


你好，请问天正风管的角度怎么得到呢？

chengfan 发表于 2021-3-18 09:44:08

print1985 发表于 2014-12-4 10:06
天正暖通8.5测试的 我能力有限 只能提供这些了
天正有材料统计功能 为什么不用？

请问下是怎么看到Hvac_S1这个对象类型的？

chengfan 发表于 2021-3-18 09:54:48

print1985 发表于 2014-12-5 23:13


大佬请问下风管的标高对象类型是什么呢
页: [1] 2
查看完整版本: 怎么样获取天正暖通风管的标注值？