yanghao1 发表于 2013-5-9 13:24:01

如何让要画的图形在光标处显示出来并跟随鼠标一起到要画的位置

就像在autocad中，复制一个圆，粘贴时这个被复制的圆在光标处隐隐约约显示，直到鼠标点击的位置就粘贴了一个圆，每次点击粘贴命令时都是这样。

Gu_xl 发表于 2013-5-9 13:35:40

不明白你说什么，也不知道你要干什么！CAD里本身就是这个样子的！

hpy 发表于 2013-5-9 16:48:21

1楼说的估计就是grread的效果。

yanghao1 发表于 2013-5-9 19:39:03

Gu_xl 发表于 2013-5-9 13:35 static/image/common/back.gif
不明白你说什么，也不知道你要干什么！CAD里本身就是这个样子的！

C#如何实现这个功能

669423907 发表于 2013-5-9 23:24:23

cp 的效果？？？

nzl1116 发表于 2013-5-10 07:53:28

(defun c:tt (/ EnLst grVal InsPt)
(setq EnLst nil TorN t)
(while TorN
    (setq grVal (grread 3))
    (if (member (car grVal) '(3 5))
      (setq InsPt (cadr grVal))
    )
    (if (= (car grVal) 3)
      (setq TorN nil)
    )
    (if (and InsPt EnLst)
      (mapcar 'entdel EnLst)
    )
    (if InsPt
      (setq EnLst (MyDrawFunc InsPt))
    )
)
(princ)
)

yanghao1 发表于 2013-5-10 13:18:57

Gu_xl 发表于 2013-5-9 13:35 static/image/common/back.gif
不明白你说什么，也不知道你要干什么！CAD里本身就是这个样子的！

这项技术叫JIG。

夏生生 发表于 2013-5-10 16:04:18

本帖最后由 夏生生 于 2013-5-10 16:08 编辑

好厉害哦！！鸟版讲了那么多我都没看懂
我也好厉害，按照古版的方法一下就实现了

wowan1314 发表于 2013-5-10 16:49:41

就是先复制

然后粘贴就可以了。

669423907 发表于 2013-5-11 21:10:38

nzl1116 发表于 2013-5-10 07:53 static/image/common/back.gif
(defun c:tt (/ EnLst grVal InsPt)
(setq EnLst nil TorN t)
(while TorN


错误: no function definition: MYDRAWFUNC
页: [1]
查看完整版本: 如何让要画的图形在光标处显示出来并跟随鼠标一起到要画的位置