[求助][LISP]

2002-ytf · 发表于 2004-8-3 11:36:00

在Arc或Pline上点两点,这两点间
如何对Arc或Pline等(两点间的直线)距离,并将这些点连接起来

CADghost · 发表于 2004-8-3 11:42:00

再说明白一点呗！

是随便点的两点，还是一些特殊点！

xhf · 发表于 2004-8-4 11:22:00

(defun c:test( / pt1 pt2 dist)

   (setq pt1 (getpoint "\n请选择弧或多义线上的第一点："))

   (setq pt2 (getpoint "\n请选择弧或多义线上的第二点："))

   (setq dist (distance pt1 pt2))

   (command "line" pt1 pt2 "")

   (princ)

   )

中间可以加入你想设的捕捉模式等。

meflying · 发表于 2004-8-4 11:29:00

楼主表达不明确。。。楼上的程序跟命令LINE差别不大

2002-ytf · 发表于 2004-8-5 18:02:00

如图

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

[求助][LISP]

本帖子中包含更多资源