[求助]：如何返回矩形的长和宽

yaker_77 · 发表于 2008-4-14 17:41:16

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

选择一个矩形，返回这个矩形的长和宽
请指教！谢谢！

caoyin · 发表于 2008-4-14 18:18:09

(defun test (rec / di)
(setq di (vlax-curve-getDistAtParam rec 1))
(list di (- (vlax-curve-getDistAtParam rec 2) di))
)

yaker_77 · 发表于 2008-4-14 19:13:31

不会用啊，能不能麻烦解释一下怎么用吧，谢谢！

ljttjl · 发表于 2008-4-17 21:27:51

如以上未解决，联系ljttjl@tom.com

yaker_77 · 发表于 2008-4-18 09:13:55

那个邮箱是收费的

有知道的花个三分钟就可以了，大家共同学习。谢谢了！

chengzhang · 发表于 2008-4-19 09:00:11

有没有能在R14下可用的返回矩形长和宽的函数啊

zml84 · 发表于 2008-4-19 13:38:16

什么是矩形？

yaker_77 · 发表于 2008-4-21 13:44:26

本人已初步完成这项工作，代码如下（没基础太难了，花了三个小时）
;;;功能：输出矩形长宽
(defun c:LAB ()
  (vl-load-com)
  (setq ss (ssget))
  (setq ent (ssname ss 0))
  (setq di (vlax-curve-getDistAtParam ent 1))
  (setq dj (- (vlax-curve-getDistAtParam ent 2) di))
  (list di dj)
)

下一步需要将其写入到CAD图形中，有没有人指点一下

账号		自动登录	找回密码
密码			立即注册

[求助] [求助]：如何返回矩形的长和宽

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子