乐筑天下

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

[编程交流] 清理文件

[复制链接]
ybx

7

主题

27

帖子

20

银币

初来乍到

Rank: 1

铜币
35
发表于 2022-7-5 20:21:01 | 显示全部楼层 |阅读模式
尊敬的各位成员：。。
我有一个清理DWG的程序。。。
这意味着删除图案填充、文本和属性。。等
 
它正在工作，但问题出在区块内部，它什么也没做。。
 
有人能帮我解决这个问题吗
 
谢谢
 
我的代码是（它不是由我创建的，我是从Cad导师那里获得的）
 
（定义c:cla（/cntr eset en cnt）
（setvar“cmdecho”0）
（setq eset
（ssget“X”
（列表
（cons-4“（cons 0”属性）
（cons 0“MLINE”）
（cons 0“多行文字”）
（cons 0“点”）
（cons 0“实心”）
（cons 0“文本”）
（cons 0“领导者”）
（cons 0“图案填充”）
（cons 0“尺寸”）
（cons-4“或>”）
)
)
)
（if（和eset（>（sslength eset）0））
（程序
（setq cnt（sslength eset））
（命令“ERASE”eset“”）
（警报（strcat“已擦除”（itoa cnt）“实体”）
)
)
（setvar“cmdecho”1）
（普林斯）
)
回复

使用道具 举报

返回列表 发帖

发表回复

高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-11 08:53 , Processed in 0.701799 second(s), 54 queries .

© 2020-2025 乐筑天下

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