昨天想在图中圆心处用entmake写单行文字,在明经搜索了半天，后来终于搞定
网友答:
感谢楼主分享网友答:
在圆内生成的文字自动适应圆尺寸改变文字宽度系数，又该如何做呢？网友答:
本帖最后由 ll_j 于 2013-12-12 11:44 编辑
这好像不应是你这个水平该惊喜的事，注意一下组码，都应该知道。
实际上，居中一般不用这种组码，多数是使用72=4,73=0.
另，自适应有两种状态，73组码都是0,72组码分别是3（对齐）和5（调整）。
不过，此时的11和12组码就不能相同了。网友答: 用一个make文字通用函数不更好么
网友答:
大哥威武 这个11的组码直接厉害了
- (defun TextMC (str pt Textheigh)
- (entmake (list '(0 . "TEXT")
- (cons 1 str)
- (cons 10 pt)
- (cons 40 Textheigh)
- (cons 11 pt)
- (cons 72 1)
- (cons 73 2)
- )
- )
- )
这好像不应是你这个水平该惊喜的事，注意一下组码，都应该知道。
实际上，居中一般不用这种组码，多数是使用72=4,73=0.
另，自适应有两种状态，73组码都是0,72组码分别是3（对齐）和5（调整）。
不过，此时的11和12组码就不能相同了。网友答: 用一个make文字通用函数不更好么
网友答:
大哥威武 这个11的组码直接厉害了