caizeping 发表于 2012-9-25 22:51:27

试试这个

革天明 发表于 2012-9-26 09:23:44

本帖最后由 革天明 于 2012-9-26 09:24 编辑

caizeping 发表于 2012-9-25 22:51 static/image/common/back.gif
试试这个
这个是将一个点移动到另一点去，跟我写的那个有点像，
见7楼http://bbs.mjtd.com/forum.php?mo ... 38&page=1#pid550358希望能用join之类的命令解决

ZZXXQQ 发表于 2012-9-26 09:35:14

(defun c:tt ()
(setvar "CMDECHO" 0)
(if (setq ss (ssget '((0 . "*POLYLINE,LINE,ARC"))))
(command "_.PEDIT" "M" ss "" "Y" "J" "10" "")
)
(setvar "CMDECHO" 1)
(princ)
)

taotao001 发表于 2016-9-16 09:49:07

学习了
页: 1 [2]
查看完整版本: 求助！！最近点连接