乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 85|回复: 8

[编程交流] 多选增加sin

[复制链接]

171

主题

447

帖子

276

银币

中流砥柱

Rank: 25

铜币
860
发表于 2022-7-6 06:31:34 | 显示全部楼层 |阅读模式
我需要通过几个窗口将所有选定的文本添加到一个集合中。
请更正我的代码
回复

使用道具 举报

0

主题

5

帖子

5

银币

初来乍到

Rank: 1

铜币
0
发表于 2022-7-6 06:41:32 | 显示全部楼层
  1. (setq tset (ssget '((0 . "*TEXT"))) i 0)
  2. (while (< i (sslength tset))
  3. (setq SS3 (ssadd (ssname tset i) SS3))
  4. (1+ i))
回复

使用道具 举报

63

主题

6297

帖子

6283

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
358
发表于 2022-7-6 06:49:26 | 显示全部楼层
  1. (setq ss3 (ssadd))
  2. (if (setq tset (ssget "_C" pw1 pw2 '((0 . "TEXT"))))
  3. (repeat (setq i (sslength tset))
  4.    (ssadd (ssname tset (setq i (1- i))) ss3)
  5. )
  6. )
回复

使用道具 举报

1

主题

1069

帖子

1050

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
69
发表于 2022-7-6 06:56:23 | 显示全部楼层
也许可以试试这样的东西
  1. (setq coll (ssadd))
  2. (while(and (setq p1 (getpoint "\nFirst corner: "))
  3. (setq p2 (getcorner p1  (getpoint "\nOpposite corner: "))
  4. (setq tset (ssget "_W" p1 p2 '((0 . "text" ))))
  5. (while (setq en (ssname tset 0))
  6. (ssadd en coll)
  7. (ssdel en tset)))))
  8. (alert (strcat "Collected: " (itoa (sslength coll))))

虽然没有测试,只是从我的头顶上
回复

使用道具 举报

63

主题

6297

帖子

6283

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
358
发表于 2022-7-6 07:07:44 | 显示全部楼层
 
我想恰恰相反
 
  1. (ssadd en coll)
回复

使用道具 举报

1

主题

1069

帖子

1050

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
69
发表于 2022-7-6 07:12:37 | 显示全部楼层
谢谢,固定在上面
回复

使用道具 举报

63

主题

6297

帖子

6283

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
358
发表于 2022-7-6 07:23:07 | 显示全部楼层
 
没有必要每次向变量ss3添加更多实体时都将新添加的内容分配给它,这样就足够了。
 
  1. (ssadd <entity> SS3)

 
不客气。
回复

使用道具 举报

171

主题

447

帖子

276

银币

中流砥柱

Rank: 25

铜币
860
发表于 2022-7-6 07:25:23 | 显示全部楼层
谢谢大家。我是这样用你的密码的。
  1. 6
回复

使用道具 举报

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 07:32:41 | 显示全部楼层
以下是我对合并多个选择集的看法:
这里有一个快捷方法,假设所有选择集都在同一个空间中:
使用选择集列表调用。
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-10 15:11 , Processed in 0.492525 second(s), 70 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表