rodrigo_sjc_sp 发表于 2022-7-6 06:15:31

帮助列出块属性

我有这个密码
 

(defun c:list_blocks()
   (vl-load-com)
   (setq selpline (ssget "_x" (list '(0 . "INSERT"))))
   (repeat (sslength selpline)      
               (setq pline_ent (ssname selpline i))
               (setq lis_ent (entget pline_ent))
               (setq value (cdr(assoc 10 (entget pline_ent))))
   )   
)

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

Tharwat 发表于 2022-7-6 06:20:56

你能上传一个样本图来测试它的例程吗?

Commandobill 发表于 2022-7-6 06:27:56

嘿,罗德里戈,
 
您希望如何导出?在csv中?在Excel中?是否在命令行中打印?还有,你说的尺寸是什么意思?你是指宽度或比例,还是这是存储在你的区块中的东西?
 
我认为需要更多的信息。

rodrigo_sjc_sp 发表于 2022-7-6 06:30:39

塔尔瓦特,
 
 
这是文件。。
 
谢谢
测试。图纸

rodrigo_sjc_sp 发表于 2022-7-6 06:34:46

Commandobill,
 
我只需要列出所有属性及其值​​, 可以使用autocad own中的“打印”命令
 
 
样品
 
块X
属性=大小10
属性=高度200
 
 
 
块Y
属性=大小23
属性=高度540

Tharwat 发表于 2022-7-6 06:39:14

 
在图形中未找到属性块

rodrigo_sjc_sp 发表于 2022-7-6 06:44:09

塔尔瓦特,
 
如果单击“编辑块”,可以看到有一些属性

rodrigo_sjc_sp 发表于 2022-7-6 06:49:02

如果相同的例程由LEE创建,
同样还给出了返回,还有更多属性,可以点击编辑块。

Tharwat 发表于 2022-7-6 06:56:21

 
我现在明白了,那是因为可见性模式是yes。

rodrigo_sjc_sp 发表于 2022-7-6 07:01:38

塔尔瓦特,
 
如果你能在代码方面帮我,我很感激你的帮助
页: [1] 2
查看完整版本: 帮助列出块属性