如何一次选取多个TEXT或MTEXT后选择集按原（TEXT或MTEXT）位置排序

xiaomihu · 发表于 2007-9-17 11:27

简单的排序

(setq sset (VL-SORT 'sset
        ;(function
   (LAMBDA (tmp1 tmp2)
     (< (nth 2 (cdr (assoc 10 tmp1)))
        (nth 2 (cdr (assoc 10 tmp2)))
     )
   )
        )
      )
;)

rln007 · 发表于 2007-9-17 11:34

英雄无敌的程序好用,可惜没源码,kmust_tang的实现了一半,当图元X坐标相同时应该按照Y坐标排序,期待kmust_tang能改进.

kmust_tang · 发表于 2007-9-17 11:41

晕哦。。。Y坐标排序跟X坐标一样。。只是要多一个条件（X坐标相同时）

我想这个你应该做得到吧

kmust_tang · 发表于 2007-9-17 11:49

这个应该可以了吧。。。

rln007 · 发表于 2007-9-17 11:55

不好做,在CAD表格里每个图元位置有误差(同一列可能X坐标有点误差,同一行可能Y坐标有点误差),多一个条件（X坐标相同时）判断不了呀,还请高手赐教.

NetBee · 发表于 2007-9-17 12:13

排序函数本站有：

http://www.mjtd.com/Functions/ArticleShow.asp?ArticleID=83

你只要稍作修改即可。

kmust_tang · 发表于 2007-9-17 12:31

晕哦。.那你说图元的坐标要怎么排,只要说个排法,那个程序改一下就行了!!!

rln007 · 发表于 2007-9-17 12:41

都是高手呀,NetBee,kmust_tang等高手多谢了

rln007 · 发表于 2007-9-17 12:43

多谢zml84无私奉献

zml84 · 发表于 2007-9-17 15:58

10楼的代码不够通用吗？

账号		自动登录	找回密码
密码			注册

如何一次选取多个TEXT或MTEXT后选择集按原（TEXT或MTEXT）位置排序

本帖子中包含更多资源

浏览过的版块