查找（find)命令的定位效果如何实现？
本帖最后由 菜卷鱼 于 2015-6-27 17:21 编辑因为系统带的find查找命令，完成之后总是要重生成一遍，大图纸就在那里卡卡卡卡卡卡，所以直接做了一个查找定位命令，现在只支持text,mtext,attdef文字，属性块。
提问：
1，find命令的定位效果如何实现的(效果见附图)？
2，多重引线的文字定位怎么做？
3，找到的多行文字里那些乱七八糟的格式代码如何去掉？
下面是我的源码，代码根据以前编的改的，没去做简化
(defun sslist (ss / i ll)
(setq i -1)
(repeat (sslength ss)
(setq ll(cons (ssname ss(setq i(1+ i)))ll))
)
)
(defun c:see
( / str s2 ssme infoopp adn1
ad0 ad2 counter pp conte ad1 adn1 adn0
sl)
(setq *error* see_err)
(setq sl nil)
(if (= ostr nil)(setq ostr "#"))
(mapcar 'princ(list "\nThe Characters wish to Find <" ostr ">:"))
(setq str(getstring ))
(if (= str "")(setq str ostr)(setq ostr str))
**** Hidden Message *****
(defun sslist (ss / i ll)
(setq i -1)
(repeat (sslength ss)
(setq ll(cons (ssname ss(setq i(1+ i)))ll))
)
)
测试了一下，发现带#号的文字查找不了，如果能再增加一个屏幕点取查找文字的功能就更好了 cad自带的find简直卡爆了 大神牛牛牛牛牛！ 看看卷菜鱼的怎么样 是啥东东看看 新东东，做
个动画
嘛 1，可以采用视图缩放，高版本zoom o ，低版本计算对角点缩放，用command函数或者VLA都可以，
如果是要将文字处于选择状态，这个暂时没想到。
2，多重引线不知道和引线LE有什么区别，LE可以用ssget选择到，
3，多行文字格式论坛有资料，去除方法也多，什么炸开成单行文字法，正则表达式，循环分离。。。。
429014673 发表于 2015-6-27 13:13 static/image/common/back.gif
新东东，做
个动画
嘛
不是新东西，只相当于CAD自带_.find功能的一小部分 edata 发表于 2015-6-27 13:14 static/image/common/back.gif
1，可以采用视图缩放，高版本zoom o ，低版本计算对角点缩放，用command函数或者VLA都可以，
如果是要将文 ...
1，我采用的也是缩放功能，然后有个虚拟的红色箭头支出位置，有时候乱指是因为是多行文字；
2，多重引线文字跟引线是一个整体。
3，第三点我再去查查。 看看卷菜鱼的怎么样 本帖最后由 SunSpring 于 2015-7-2 18:14 编辑
cad确实有这个问题.
SunSpring 发表于 2015-6-27 15:28 static/image/common/back.gif
其实我也是因为这个问题开发了个查找替换.大家试试看吧.命令qf
不喜欢对话框