关于entmake text 对正点
现有个问题请教各位大侠,(command "text" "mc" p1 h1 0 sxh1) 是以P1为中心对齐点插入文字,但是我想用entmake方式创建文字, "mc"应该怎么表达呢在论坛上找了半天都没有找到答案。 (entmake (list '(0 . "TEXT")
(cons 10 txt_point)
(cons 40 300)
'(41 . 0.8)
(cons 1 "txt")
'(7 . "hztxt")
'(72 . 1)
'(73 . 2)
'(8 . "0")
)
)
这样写的是不对的这个72 73该怎么写呢,恳请各位出手相助谢谢困扰一天了!
;;;生成单行文字
;;; 1为text为文字内容 7为文字样式 8为文字图层 10为文字起点 40为文字高度 51为文字角度 62为文字颜色 41为文字高宽比
;;;其中1、10、40为必须有的,其他可精简
;;;72 73码为文字对齐方式;左上(0 3)左中(0 2)左下(0 1) 左(0 0) 中上(1 3)正中(1 2)中下(1 1) 中心(1 0)右上(2 3)右中(2 2)右下(2 1) 右(2 0)
(defun mak-text ( text pt layer height angle color)
(entmake (list '(0 . "TEXT") (cons 1 text)(cons 7 style)(cons 8 layer)(cons 10 pt)(cons 40 height)(cons 51 angle)(cons 62 color)(cons 11 pt)(cons 72 1) (cons 73 2) '(41 . 0.7)))
) 添加组码 10和11
(entmake (list'(0 . "text")'(72 . 4)'(370 . 100)(cons 1(itoa ix))(cons 10 x0y)(cons 11 x0y)(cons 40 zigao)(cons 41 zikuan)(cons 8 tcm)(cons 62 ys))) 669423907 发表于 2019-9-20 22:08
添加组码 10和11
(entmake (list'(0 . "text")'(72 . 4)'(370 . 100)(cons 1(itoa ix))(cons 10 x0y)(cons ...
cons 10 txt_point我这个 txt_point不是固定的位置,怎么表达坐标值呢,能不能具体写下呢?谢谢! andymong 发表于 2019-9-20 22:29
;;;生成单行文字
;;; 1为text为文字内容 7为文字样式 8为文字图层 10为文字起点 40为文字高度 51为文字角 ...
感谢感谢可以用了:victory::handshake 对于mtext,控制文字的对齐格式可以使用以下组码:
(71 . 1) 左对齐-上对齐 这个是默认的对齐方式
(71 . 4) 左对齐-中央对齐
(71 . 7) 左对齐-下对齐
(71 . 2) 居中对齐-上对齐
(71 . 5) 居中对齐-中央对齐
(71 . 8) 居中对齐-下对齐
(71 . 3) 右对齐-上对齐
(71 . 6) 右对齐-中央对齐
(71 . 9) 右对齐-下对齐
页:
[1]