发个小程序:图框内文字标注自动调整大小比例

1993063 · 发表于 2013-12-7 22:53:14

848818376 发表于 2013-12-6 22:32
不解释，浪费啊还我的明经币！！！

半听可乐 · 发表于 2013-12-8 10:36:26

看看好作品

1993063 · 发表于 2013-12-8 10:43:07

半听可乐发表于 2013-12-7 16:36
看看好作品

选择对象为了减少遍历双循环.所以改成了属性块

原地踏步 · 发表于 2013-12-9 12:31:39

看都不让看就想要钱？

xujinhua · 发表于 2013-12-9 22:01:46

看一下先............

52幕墙设计 · 发表于 2013-12-10 21:14:03

论坛有一个根据图框设置当前标注样式比例的

1993063 · 发表于 2013-12-10 21:25:15

本帖最后由 1993063 于 2013-12-10 03:28 编辑

52幕墙设计发表于 2013-12-10 03:14
论坛有一个根据图框设置当前标注样式比例的

好像是有,获得块的组码41或42得出块的比例

1993063 · 发表于 2013-12-10 21:37:32

52幕墙设计发表于 2013-12-10 03:14
论坛有一个根据图框设置当前标注样式比例的

一个简单获得块并调整比例例子

(defun c:tt ( / ent41)
  (setq ent41 (cdr (Assoc 41 (Entget (car (entsel "\n样板块"))))))
  (setvar 'DIMSCALE ent41)
  (princ)
)

669423907 · 发表于 2013-12-11 17:12:41

图框要有些什么要求吗？

1993063 · 发表于 2013-12-11 17:25:55

669423907 发表于 2013-12-10 23:12
图框要有些什么要求吗？

块放大或缩小的比例,也就是组码41 42的比例因子

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

[源码] 发个小程序:图框内文字标注自动调整大小比例