更改sp的宽度因子

suryatry26 · 发表于 2022-7-5 18:43:34

如何更改具有属性的特定字段的宽度因子。
是否可以使用多个dwg的批处理方法？

属性字段名称如下：
日期：
绘制：
选中的：
在这里，我需要更改多dwg文件的“绘制”字段值的宽度因子。

Tharwat · 发表于 2022-7-5 18:47:51

属性字段是什么意思？你是说标签名吗？

我可以帮助您使用lisp程序，但不能在多个闭合图形上使用批处理程序。

suryatry26 · 发表于 2022-7-5 18:53:05

是的。。属性表示标记名。。。由“ATT”命令创建的属性。

在我的dwg中有多个名称不同的属性。我需要更改“绘制”属性宽度因子。

Tharwat · 发表于 2022-7-5 18:57:59

仅绘制与标记名相关的文本字符串？

suryatry26 · 发表于 2022-7-5 19:03:39

你能告诉我如何在这里附加dwg文件吗？然后我将为您添加参考文件。

Tharwat · 发表于 2022-7-5 19:06:19

看看论坛的右侧，然后你会看到按钮前进，按下它，在新打开的窗口中有一个名为“附加…”的按钮。。。。

suryatry26 · 发表于 2022-7-5 19:07:56

无法附加我的jpg文件，哪一个是24KB。

我在下面做了。

使用ATT命令，我创建了一个属性。给出了绘制的标记名称。在那之后，我用block换成block。

演示视频如下：

Tharwat · 发表于 2022-7-5 19:13:57

将以下代码复制到记事本程序中的新文件，然后用您喜欢的任何名称保存（例如Test.lsp），然后打开图形调用命令ap，然后选择先前创建的lisp文件，然后返回Autocad并键入Test以启动。

copy


(defun c:Test (/ ss sc i sn e)
 ;; Tharwat 20.08.2015        ;;
 (princ "\nSelect Attributed Blocks :")
 (if (and (setq ss (ssget '((0 . "INSERT") (66 . 1))))
          (setq sc
                 (getdist
                   "\nSpecify New Width Factor for Attributes between [0.5 - 2.0] :"
                   )
                )
          (< 0.49 sc 2.1)
          )
   (repeat (setq i (sslength ss))
     (setq sn (ssname ss (setq i (1- i))))
     (while (/= (cdr (assoc 0 (entget (setq sn (entnext sn)))))
                "SEQEND"
                )
       (if (eq (cdr (assoc 2 (setq e (entget sn)))) "Drawn")
         (entmod (subst (cons 41 sc) (assoc 41 e) e))
         )
       )
     )
   )
 (princ)
 )

suryatry26 · 发表于 2022-7-5 19:16:34

Tharwat我已经尝试了&“绘制”字段值宽度因子没有得到更改。

Tharwat · 发表于 2022-7-5 19:20:32

拜托，伙计，这很简单。

上载包含目标属性块的样例图形。

[编程交流] 更改sp的宽度因子

发表回复

精选推荐