A-A+
使用AutoLISP创建多行文字
使用AutoLISP创建多行文字,可直接使用command命令调用AutoCAD的多行文字命令MTEXT,代码如下:
(defun c:mtxt()
(command "_.MTEXT" (getpoint "\n文本左放置点:") "H" 5 (getpoint "\n文本右放置点:") (getstring "\n输入文字内容:") "")
)
通过参数“H”指定文本高度,如果不设置文本右侧边界,直接指定文本宽度为0即可,如下:
(command "_.MTEXT" (getpoint "\n文本左放置点:") "H" 5 "W" 0 (getstring "\n输入文字内容:") "")