修改块的属性（如块中线的长短）出现的问题。。。。

挚友01 · 发表于 2018-2-27 09:43:21

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

我将某个块中的如线的长短进行修改后,再REDRAW时，图中所有的同名块都跟着变化，我只想对当前的一个块进行修改，大家是怎么解决这个问题的?

newer · 发表于 2018-2-27 10:38:00

把代码贴上来。

挚友01 · 发表于 2018-2-27 10:40:45

获取块内的实体属性
(defun MM01_Q(e / b bb e c tem ele)
(setq ele '() bl_1 (cdr (assoc 41 (entget e))))
(setq e (tblobjname "block" (cdr (assoc 2 (setq bb (entget e))))))
(while (setq e (entnext e))
  (setq ele (cons (entget e) ele))
)
ele
)
; 修改实体的厚度
(defun MM02_q(bb val1 / val1 bb)
(if (assoc 39 bb)
  (progn
(setq bb (subst (cons (car (assoc 39 bb)) val1)(assoc 39 bb) bb))
(entmod bb)
  )
)
)
(defun MM02_zh(e val1 / e val1 bb c bl_1) ; 组合修改
(setq bb (MM01_q e))
(setq c 0)
(repeat (length bb)
  (MM02_q (nth c bb) (/ val1  bl_1))
  (setq c (+ c 1))
)
(entupd e)
)

MM02_zh是用于修改块内属性的子程序

marting · 发表于 2018-2-27 12:25:01

你自己试试用BEDIT编辑一个块，然后REGEN，看看是什么情况

挚友01 · 发表于 2018-2-27 13:48:35

全都变了。。。可我只想一个变....

marting · 发表于 2018-2-27 14:37:41

挚友01 发表于 2018-2-27 13:48

这就是块的特性，否则就不是块了。

你可以把你想的，炸开，修改后，在生成个另外的块。

/db_自贡黄明儒_ · 发表于 2018-2-27 15:09:46

本帖最后由 /db_自贡黄明儒_ 于 2018-2-27 15:20 编辑

你要给这个块单独取一个名字长短线不是通常所说的属性，那是块定义。属性通常是指文字，改一个块的属性文字不影响其它块。

挚友01 · 发表于 2018-2-27 15:19:54

这样有问题，例如我的窗是一块，块中都含有相关尺寸，最终我是要根据块名提取和统计设料的,更名只适合某些不需要统计的“设备"。有没有其它解决办法和思路....

/db_自贡黄明儒_ · 发表于 2018-2-27 15:21:47

挚友01 发表于 2018-2-27 15:19

“相关尺寸”如果属性文字，则可以不改块名。

st788796 · 发表于 2018-2-27 16:01:14

1 使用动态块，将需要修改的实体加入一个参数
2 将块定义复制一个，在新块定义中修改并替换当前 Insert
3 炸开修改

任选一种方法

账号		自动登录	找回密码
密码			立即注册

[求助] 修改块的属性（如块中线的长短）出现的问题。。。。

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。