[求助]：如何设置文字的宽度比例？

lujoo · 发表于 2009-2-17 20:25:13

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

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

×

我想选择图里所有的宽度比例超过0.7的文字，把它的宽度比例设置成0.7，如何实现啊？

fl202 · 发表于 2009-2-18 08:17:58

很简单啊。
(setq s1 (ssget "x"  '((0 . "text"))))
(setq i 0)
(repeat (sslength s1)
  (setq ssn (ssname s1 i)
(setq ssdata (entget ssn))
(setq tx (cdr (assoc 41 ssdata)))
(if (/= tx 0.7)
   (progn
         (setq tx1 (cons 41 0.7))
         (setq ssdata (subst tx1 tx ssdata))
         (entmode    ssdata)
   ))

我就在这上面写的，大致就是这样，没有经过调试，你自己试试吧，应该没有问题的。

lujoo · 发表于 2009-2-18 12:23:10

谢谢，已经搞定了

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

[求助] [求助]：如何设置文字的宽度比例？

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

相关帖子