2
20
18
初来乍到
使用道具 举报
106
1万
101
顶梁支柱
(vl-load-com)(defun c:plinearea ( / obj)(setq obj (vlax-ename->vla-object (car (entsel "\nPick Pline"))))(setq plarea (vla-get-area obj))(alert (strcat "Area is sq feet " (rtos plarea 2 2) "\n\n" "Area is sq m" (rtos (* plarea 0.09290304) 2 2))))
4
2143
2197
限制会员
10
45
35
初露锋芒
本版积分规则 发表回复 回帖后跳转到最后一页
微信公众平台
扫描访问手机版
点击图片下载手机App
|关于我们|小黑屋|乐筑天下 繁体中文
GMT+8, 2025-3-14 15:48 , Processed in 1.394588 second(s), 72 queries .
© 2020-2025 乐筑天下
在线时间:10:00-17:00
暂无
扫一扫,关注我们
帮助中心
关于我们
下载APP客户端