小万LISP 发表于 2019-9-29 18:36:54

分享：entmake创建单行文字

本帖最后由 小万LISP 于 2019-9-30 14:09 编辑

因占用空间小，显示速度快，所以特别偏爱单行文字+shx矢量字形。 所用代码如下：


[*]

[*](entmake
[*]    (list
[*]      '(0 . "TEXT")       ;图元类型：单行文字
[*]      '(41 . 0.8)         ;宽度比例
[*]      '(7 . "romans+hzdx")    ;文字样式
[*]      (cons 1 "内容")       ;文字内容
[*]      (cons 10 pt)         ;起点
[*]      (cons 40 height)    ;文字高度
[*]      (cons 8 "图层")      ;图层名
[*]      (cons 62 颜色编号)      ;颜色，bylayer=256
[*]      (cons 72 dz)         ;文字对正类型：0 左，1 中下
[*]      (cons 50 0)         ;文字旋转角度
[*]      (cons 51 0)         ;文字倾斜角度
[*]    )
[*])




jinan1913 发表于 2019-10-8 14:46:00

跟着你学习lisp

小万LISP 发表于 2019-10-8 18:22:59

jinan1913 发表于 2019-10-8 14:46
跟着你学习lisp

……额，我也是新手……:$

mocheng 发表于 2019-10-20 23:24:03

一起学习学习

paulpipi 发表于 2019-10-23 07:51:15


一起学习学习

sbwdx 发表于 2019-11-2 16:57:39

老师你好，请问这个文字对正类型，可以设置成正中对齐嘛？组码怎么写啊

小万LISP 发表于 2019-11-3 08:54:39

sbwdx 发表于 2019-11-2 16:57
老师你好，请问这个文字对正类型，可以设置成正中对齐嘛？组码怎么写啊


[*](entmake
[*](list
[*]    '(0 . "TEXT")   ;图元类型：单行文字
[*]    '(41 . 0.8)       ;宽度比例
[*]    '(7 . "standard") ;文字样式
[*]    (cons 1 "内容")   ;文字内容
[*]    (cons 11 pt)      ;对齐点
[*]    (cons 40 height);文字高度
[*]    (cons 8 "图层")   ;图层名
[*]    (cons 62 颜色编号);颜色，bylayer=256
[*]    (cons 72 1)       ;文字水平对正类型：0 左，1 居中
[*]    (cons 73 2)       ;文字垂直对正类型 2 = 居中对正
[*]    (cons 50 0)       ;文字旋转角度
[*]    (cons 51 0)       ;文字倾斜角度
[*])
[*])

sbwdx 发表于 2019-11-3 12:11:53

小万LISP 发表于 2019-11-3 08:54
[*](entmake
[*](list
[*]    '(0 . "TEXT")   ;图元类型：单行文字


谢谢老师
页: [1]
查看完整版本: 分享：entmake创建单行文字