土木在线
资料
论坛
课程
AI规范
成套资料包
APP
下载手机客户端
产品
兑换商城
直播
软件
会议
精品试听季，好课抢鲜听
工程师进阶必备，全套项目资料包来袭！
登录
/
注册
登录土木在线
学习职场硬技能
持续上新实用资料
讲师答疑&多端学习
获取最新政策资讯
免费职称评审服务
立即登录
新用户领取770优惠券
消息
动态
0
正在加载...
查看全部消息
消息设置
正在加载...
查看全部动态
消息设置
土木在线论坛
\
建筑设计
\
CAD下载及教程
\
如何只选择图中的数字
如何只选择图中的数字
想对数字进行计算，但是选择集(ssget (0."TEXT"))里面有些不是数字，想问有什么办法之选择数字？
发布于
2006-05-04 17:34:04
我来答
分享
复制链接
新浪微博
微信扫一扫
举报
全部回答
（5 ）
biechen
这个很容易实现：
(defun getssnum( / ss ssnum i en str)
(setq ss (ssget ’ ((0 . "TEXT"))))
(setq ssnum (ssadd) i -1)
(repeat (sslength ss)
(setq en (ssname ss (setq i (1+ i))))
(setq str (cdr (assoc 1 (entget en))))
(if (wcmatch str "~*[~0-9.]*")
(setq ssnum (ssadd en ssnum))
)
)
ssnum
)
2006-08-05 20:33:05
来自 PC
评论
举报
lm2008888
看不懂,我还要加紧苦练了
2006-05-29 23:16:29
来自 PC
评论
举报
加载更多
相关推荐
nigma
这个家伙什么也没有留下。。。
主题
57
回复
583
粉丝
2
+ 关注
私信
CAD下载及教程
返回版块
52.09 万条内容 · 682 人订阅
猜你喜欢
遇到了一点小问题
内容不能包含下列词语
返回修改
回帖成功
经验值 +
10
全部回答（5 ）
-
biechen
这个很容易实现：
2006-08-05 20:33:05
来自 PC
评论
举报
-
lm2008888
看不懂,我还要加紧苦练了
2006-05-29 23:16:29
来自 PC
评论
举报
加载更多(defun getssnum( / ss ssnum i en str)
(setq ss (ssget ’ ((0 . "TEXT"))))
(setq ssnum (ssadd) i -1)
(repeat (sslength ss)
(setq en (ssname ss (setq i (1+ i))))
(setq str (cdr (assoc 1 (entget en))))
(if (wcmatch str "~*[~0-9.]*")
(setq ssnum (ssadd en ssnum))
)
)
ssnum
)