[求助]请教各位老师

runkeji · 发表于 2003-9-18 09:55:00

对于由线段组成的矩形，怎样转化为一个矩形对象，提取长宽呀

runkeji · 发表于 2003-9-18 10:00:00

(setq rectu (car(entsel "选择要提取数据的图形")))
  (setq lstg (entget rectu))
  (while (setq lst (assoc 10 lstg))
   (progn
         (setq lstg (vl-remove lst lstg))
         (setq ll (list ll lst ))
   )
)
这样能提取点的坐标吗？怎样分解LL 表中元素

runkeji · 发表于 2003-9-18 10:53:00

如果有多个矩形，不需要人工选择，怎样确定矩形的长宽呢？

runkeji · 发表于 2003-9-19 10:59:00

你好：
我想如果绘出的矩形在不知矩形由 LINE PLINE REGOIN 的时候，判断图元的名称
如果是 LWPOLYINE就不用转换了。
如果不是则提取矩形的对角点绘出矩形
将以前的删除。
提取矩形的长宽。

你们看这样可行吗？如果可行，能否写一段程序看一下。

谢谢！

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