自定义含文字的线型

先看一下系统自带的线型文件acadiso.lin:

*HOT_WATER_SUPPLY,Hot water supply ---- HW ---- HW ---- HW ----
A,12.7,-5.08,["HW",STANDARD,S=2.54,U=0.0,X=-2.54,Y=-1.27],-5.08
* 线型文件中,每种线型必须以(*)开头  
HOT_WATER_SUPPLY 线型名称  
Hot water supply ---- HW ---- HW ---- HW ---- 线型描述  
A 对齐方式,必须的,也是唯一的  
12.7 起始为12.7个单位长的实线  
-5.08 接上为长5.08的空白 可以看出:正数为实线,虚线为空白
[] 内为图案定义 这里是文字图案
“HW” 文字内容  
STANDARD 文字样式,需要注意的是,如果文档中未发现文字样式,会发生错误(eKeyNotFound),建议设置成STANDARD

因为STANDARD是每个CAD文档必须要有的文字样式,同样的,如果想更改系统自定义的带文字的线型样式,需要更改STANDARD

S=2.54 要用于文字样式的缩放比例与线型的比例相关。文字样式的高度需乘以缩放比例。如果高度为 0,则 S=值的值本身用作高度  
U=0.0 U = 值、R = 值或 A = 值。U= 指定正立或易于阅读的文字。R= 指定相对于直线的相对或相切旋转。A= 指定文字相对于原点的绝对旋转;即所有文字不论其相对于直线的位置如何,都将进行相同的旋转 旋转是围绕基线和实际大写高度之间的中点进行的
X=-2.54 文字在线型的 X 轴方向上沿直线的移动。使用该字段控制文字与前面提笔或落笔笔划间的距离 该值不能按照 S=值定义的缩放比例进行缩放,但是它可以根据线型进行缩放
Y=-1.27 文字在线型的 Y 轴方向垂直于该直线的移动。使用此字段控制文字相对于直线的垂直对齐。 该值不能按照 S=值定义的缩放比例进行缩放,但是它可以根据线型进行缩放。
-5.08 以长5.08的空白结束

 

 

        [CommandMethod("CTL")]
        public void CreateTextLinetype()
        {
            Document doc = Application.DocumentManager.MdiActiveDocument;
            Database db = doc.Database;
            Editor ed = doc.Editor;
            Transaction tr = db.TransactionManager.StartTransaction();
            using (tr)
            {
                TextStyleTable tt = (TextStyleTable)tr.GetObject(db.TextStyleTableId, OpenMode.ForRead);
                LinetypeTable lt = (LinetypeTable)tr.GetObject(db.LinetypeTableId, OpenMode.ForWrite);
                LinetypeTableRecord ltr = new LinetypeTableRecord();

                ltr.Name = "管线";
                ltr.AsciiDescription = "管线线型 ---- 管线 ---- 管线 ---- 管线 ----";
                ltr.PatternLength = 1.3;//所有实线+空白的长度总和
                ltr.NumDashes = 3;//所有实线+空白的段落总和
                //第一段
                ltr.SetDashLengthAt(0, 0.5);
                //第二段
                ltr.SetDashLengthAt(1, -0.4);
                ltr.SetShapeStyleAt(1, tt["STANDARD"]);
                ltr.SetShapeNumberAt(1, 0);//图案在图形文件中的编号,由于这里是文字,可以省略该设置
                ltr.SetShapeScaleAt(1, 0.1);
                ltr.SetTextAt(1, "管线");
                ltr.SetShapeRotationAt(1, 0);
                ltr.SetShapeOffsetAt(1, new Vector2d(0, -0.05));//X轴不对,Y轴向下移动0.05个单位
                //第三段
                ltr.SetDashLengthAt(2, -0.4);

                // 添加新线型到线型表
                ObjectId ltId = lt.Add(ltr);
                tr.AddNewlyCreatedDBObject(ltr, true);
                tr.Commit();
            }
        }

需要注意的是,文字(管线)两侧的空白并不对称,这是因为文字(管线)或图形的长度实际是占用了下一个段落的长度,

这里就是占用了第三段空白0.4的长度一部分,所以该段空白长度实际小于0.4。

我们向来提倡对称美,那么应该怎么处理使文字两侧的空白看起来是对称的呢,思路是用包围圈计算出文字(管线)的单位长度,

然后第三段在0.4的基础上加上文字(管线)的长度即可。

改善后效果如下:

 

posted @ 2019-07-19 12:12  小石头|Stone  阅读(1156)  评论(0编辑  收藏  举报