Bill Tillman 发表于 2022-7-6 08:23:30

带下划线的文本

我正在使用李·麦克慷慨提供给我们的m-Text例程。我对它做了一些补充以适应我使用的样式,但似乎找不到如何让它创建带下划线的文本。我在这个办公室使用AC 2009。我想做的是创建这样一个便笺:
 
一般说明:
 
•这是注释#1
•这是注释2
•等等。。。。
 
使用M-Text并用//P构建一个字符串来分隔段落效果很好,但我希望第一个句子加下划线。我成功的唯一方法就是画一条线,让第一个句子看起来像下划线一样。我试图创建一种新的文本样式,它会在文本上加下划线,但在AC 2009中似乎不可能。
 
我使用的M-Text例程如下所示:
 
(defun M-Text (pt str txtclr a)
(entmakex (list (cons 0 "MTEXT")         
               (cons 100 "AcDbEntity")
               (cons 100 "AcDbMText")
               (cons 10 pt)
               (cons 7 "DIM")
               (cons 71 a)
               (cons 62 txtclr)
               (cons 1 str))))

MSasu 发表于 2022-7-6 08:56:38

您可以尝试:
(cons 1 "{\\LGENERAL NOTES}:\\PThis is note #1")
 
当做
米尔恰

Lee Mac 发表于 2022-7-6 09:21:49

http://docs.autodesk.com/ACD/2010/ENU/AutoCAD%202010%20User%20Documentation/index.html?url=WS1a9193826455f5ffa23ce210c4a30acaf-htm,主题编号=d0e123454

Organic 发表于 2022-7-6 09:29:24

 
这是哪个节目?
页: [1]
查看完整版本: 带下划线的文本