为何这样运行会将第一次的选择集清空，xdrx-ssget问题

dyjwyqz5221

(and (xdrx-initssget "\n框选平面图:") (setq ss-pm (xdrx-ssget ":L" '((0 . "text") (1 . "*KZ*,*LZ*,*QZ*"))))
        (xdrx-initssget "\n框选详图:") (setq ss-xt (xdrx-ssget ":L" '((0 . "text") (1 . "*KZ*,*LZ*,*QZ*"))))
)


命令: (and (xdrx-initssget "\n框选平面图:") (setq ss-pm (xdrx-ssget ":L" '((0 . "text") (1 . "*KZ*,*LZ*,*QZ*"))))
(_>         (xdrx-initssget "\n框选详图:") (setq ss-xt (xdrx-ssget ":L" '((0 . "text") (1 . "*KZ*,*LZ*,*QZ*"))))
(_> )
框选平面图:指定对角点: 找到 60 个
框选平面图:
框选详图:指定对角点: 找到 13 个
框选详图:
T
命令: (sslength ss-pm)
nil
命令: (sslength ss-xt)
13

这是啥原因？

XDSoft

ARX限制最大选择集数量不能超过128个
因此API做了处理，
1、共设置了10个房间存放不同的选择集
2、默认使用的是9号房间，如果不指定，每次建立选择集都在9，后建立的就把前面的冲了。
3、通过设置变量，使得API函数创建的选择集选择不同的房间，通过 (xdrx-setvar "picksethome" <0-9>)

1. (xdrx-setvar "picksethome" 2)
   
2. (setq ss1 (xdrx-ssget "\n选择要处理的对象<退出>:"))
   
3. (xdrx-setvar "picksethome" 3)
   
4. (setq ss2 (xdrx-ssget "\n选择要处理的直线<退出>:" '((0 . "line"))))

(xdrx-setvar "picksethome" 2)<br /> (setq ss1 (xdrx-ssget "\n选择要处理的对象<退出>:"))<br /> (xdrx-setvar "picksethome" 3)<br /> (setq ss2 (xdrx-ssget "\n选择要处理的直线<退出>:" '((0 . "line"))))

通过上面可以看到 xdrx-ssget 新用法，如果想只给提示字符串，不需要用 xdrx-initssget了，直接把提示写到 xdrx-ssget里面
(xdrx-ssget "\n选择表格" '((0 . "table")))

dyjwyqz5221

刚才测试了下。这个函数用法边了吗？
(xd::drag:simplemove (entlast) "\n表格插入点:" 6 t)
在'(0. 0. 0.)生成表格后，再运行这句就出现：

命令: (xd::drag:simplemove (entlast) "\n表格插入点:" 6 t)
Cancel

dyjwyqz5221

XDSoft 发表于 2020-6-17 11:23
ARX限制最大选择集数量不能超过128个
因此API做了处理，
1、共设置了10个房间存放不同的选择集

刚才测试了下。这个函数用法变了吗？
(xd::drag:simplemove (entlast) "\n表格插入点:" 6 t)
在'(0. 0. 0.)生成表格后，再运行这句就出现：

命令: (xd::drag:simplemove (entlast) "\n表格插入点:" 6 t)
Cancel
api是今天版本的

XDSoft

dyjwyqz5221 发表于 2020-6-17 16:51
刚才测试了下。这个函数用法变了吗？
(xd::drag:simplemove (entlast) "\n表格插入点:" 6 t)
在'(0. 0. ...

去重新下载下 通用LISP函数库