changyiran 发表于 2012-4-11 15:35 static/image/common/back.gif
绝对好贴，我现在在思考能不能直接建立选择集包含离指定点距离小于给定值的插入点（insert），这个功能其他 ...
那个我想过，但是不行，那个相当于范围是矩形（含正方形），但我的要求应该是选择圆内的插入点。范围是比矩形范围小的。
本帖最后由 wowan1314 于 2012-5-3 18:33 编辑
这个可以顶。多发些这样的帖子。对我等菜鸟帮助极大。
hao hao
哇，基础性的东西是最好的了哈，谢谢
'(-4 . "<and")。。。 (cons 10 pt1)楼上总结的好。
有没有办法直接选到 “外部参照”“外部引用”啊？楼主。
选择经过某点的实体，
(defun c:test19()
(setq pt (getpoint))
(setq ss (ssget “c” pt pt))
)这个有问题如下：
1.一个点的射线很多时，会全部选上。
2.选上的实体中，可能存在并不过指定点的实体（如果几条线在某地发散，并没有共同点，但是其端点非常近，距离在图面完全显示时看不出来即可，这时将全部选中了）其实没有一实体过指定点。
隔了好长时间了，还是有人顶出来；
让我倍感温故知新
可能得往另外2个方面继续延伸下，
1) SSGET相关的系统变量，如提示语禁用的nomut，LeeMac的选择函数
;; ssget-Lee Mac
;; A wrapper for the ssget function to permit the use of a custom selection prompt
;;
;; Arguments:
;; msg - selection prompt
;; params - list of ssget arguments
(defun LM:ssget(msg params / sel)
(princ msg)
(setvar 'nomutt 1)
(setq sel (vl-catch-all-apply 'ssget params))
(setvar 'nomutt 0)
(if (and sel (not (vl-catch-all-error-p sel)))
sel
)
)2)各种选择的优劣对比，尤其是选择模式的"CP" "w" "wp" "F"，如果在同一个子程序中重复调用叫多次，发现
(ssget "_F" p1 p2 filter)效率最高。
太霸气了！学习了！
楼主很强大