乐筑天下

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

[编程交流] 帮助列出块属性

[复制链接]

57

主题

183

帖子

126

银币

后起之秀

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

铜币
285
发表于 2022-7-6 06:15:31 | 显示全部楼层 |阅读模式
我有这个密码
 
  1. (defun c:list_blocks()
  2.      (vl-load-com)
  3.      (setq selpline (ssget "_x" (list '(0 . "INSERT"))))
  4.      (repeat (sslength selpline)      
  5.                  (setq pline_ent (ssname selpline i))
  6.                  (setq lis_ent (entget pline_ent))
  7.                  (setq value (cdr(assoc 10 (entget pline_ent))))
  8.      )   
  9. )

 
 
在这段代码中,我需要列出所有的块属性。。。。。。。。。。。。。。
块在变量中(pline\u ent)
 
 
 
 
现在,如何重复列出所有心房及其值​​?
 
 
前任:
 
块X
属性=大小10
属性=高度200
 
 
谢谢
罗德里戈
回复

使用道具 举报

63

主题

6297

帖子

6283

银币

后起之秀

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

铜币
358
发表于 2022-7-6 06:20:56 | 显示全部楼层
你能上传一个样本图来测试它的例程吗?
回复

使用道具 举报

12

主题

395

帖子

384

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
60
发表于 2022-7-6 06:27:56 | 显示全部楼层
嘿,罗德里戈,
 
您希望如何导出?在csv中?在Excel中?是否在命令行中打印?还有,你说的尺寸是什么意思?你是指宽度或比例,还是这是存储在你的区块中的东西?
 
我认为需要更多的信息。
回复

使用道具 举报

57

主题

183

帖子

126

银币

后起之秀

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

铜币
285
发表于 2022-7-6 06:30:39 | 显示全部楼层
塔尔瓦特,
 
 
这是文件。。
 
谢谢
测试。图纸
回复

使用道具 举报

57

主题

183

帖子

126

银币

后起之秀

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

铜币
285
发表于 2022-7-6 06:34:46 | 显示全部楼层
Commandobill,
 
我只需要列出所有属性及其值​​, 可以使用autocad own中的“打印”命令
 
 
样品
 
块X
属性=大小10
属性=高度200
 
 
 
块Y
属性=大小23
属性=高度540
回复

使用道具 举报

63

主题

6297

帖子

6283

银币

后起之秀

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

铜币
358
发表于 2022-7-6 06:39:14 | 显示全部楼层
 
在图形中未找到属性块
回复

使用道具 举报

57

主题

183

帖子

126

银币

后起之秀

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

铜币
285
发表于 2022-7-6 06:44:09 | 显示全部楼层
塔尔瓦特,
 
如果单击“编辑块”,可以看到有一些属性
回复

使用道具 举报

57

主题

183

帖子

126

银币

后起之秀

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

铜币
285
发表于 2022-7-6 06:49:02 | 显示全部楼层
如果相同的例程由LEE创建,
同样还给出了返回,还有更多属性,可以点击编辑块。
回复

使用道具 举报

63

主题

6297

帖子

6283

银币

后起之秀

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

铜币
358
发表于 2022-7-6 06:56:21 | 显示全部楼层
 
我现在明白了,那是因为可见性模式是yes。
回复

使用道具 举报

57

主题

183

帖子

126

银币

后起之秀

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

铜币
285
发表于 2022-7-6 07:01:38 | 显示全部楼层
塔尔瓦特,
 
如果你能在代码方面帮我,我很感激你的帮助
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-10 18:24 , Processed in 0.975682 second(s), 72 queries .

© 2020-2025 乐筑天下

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