669423907 发表于 2014-11-7 22:44:53

向大家请教一个问题:请问如何判断光标点是否有图元:

向大家请教一个问题:请问如何判断光标点是否有图元:
(setq gbwz (grread 3));光标位置
(if (member (car gbwz) '(3 5))
(setq od (cadr gbwz)));鼠标位置

od 在图元上 (progn,,,,,,

谢谢了

Gu_xl 发表于 2014-11-7 22:54:56

(If (ssget od)...

wowan1314 发表于 2014-11-7 23:10:28

如果要过滤实体就用 ssget

如果仅考虑光标下是否有实体, 则 nentsel 即可!

669423907 发表于 2014-11-7 23:23:24

Gu_xl 发表于 2014-11-7 22:54 static/image/common/back.gif
(If (ssget od)...

;构造线
(defun c:55()
(setq hengshu? (getpoint "\n左键 ━,右键 ▏"))
(setq gbwz (grread 3));光标位置
(if (member (car gbwz) '(3 5))
(setq od (cadr gbwz)));鼠标位置
(if (ssget od)
(if hengshu?
(command "xline" "h" od "" (c:55))        ;左键 ━
(command "xline" "v" od "" (c:55))        ;右键 ▏
))
(command "Xline" Pause Pause "")
(princ))

很好用,如果能像原来那样,那条线跟着一起出来就更爽了

再次非常感谢G版

669423907 发表于 2014-11-7 23:28:46

wowan1314 发表于 2014-11-7 23:10 static/image/common/back.gif
如果要过滤实体就用 ssget

如果仅考虑光标下是否有实体, 则 nentsel 即可!

wowan1314好久不见,其实我什么都不懂的,nentsel 要怎么用呢?

wowan1314 发表于 2014-11-8 00:09:10

呵呵!我偶尔来溜达下!
你查函数帮助,比我直接告诉你要强些!
且我记的不一定准确详细!
页: [1]
查看完整版本: 向大家请教一个问题:请问如何判断光标点是否有图元: