阅读下一篇
求助:数字递增复制的跟随鼠标点击这段代码不能跟随鼠标复制,每次点击鼠标都在原地复制[code];****************************************************数字递增复制(defun c:TC (/ E ENEW NV P S) (princ "\n 数字递增复制") (if (and (setq e (car (entsel "\nSelect Text: "))) (setq e (vlax-ename->vla-object e))
回帖成功
经验值 +10
全部回复(3 )
只看楼主 我来说两句回复 举报
回复 举报