通过

如何：绘制自定义虚线

  • 项目

GDI+ 提供 DashStyle 枚举中列出的几种虚线样式。 如果这些标准的虚线样式不能满足需求，则可创建自定义的虚线模式。

示例

若要绘制自定义虚线，请将短划线和间距的长度放在一个数组中，并将该数组指定为 Pen 对象的 DashPattern 属性的值。 下面的示例绘制了一条基于 {5, 2, 15, 4} 数组的自定义的虚线。 如果将数组元素乘以钢笔的宽度 5，可得到 {25, 10, 75, 20}。 显示的短划线的长度在 25 和 75 之间交替，间距的长度在 10 和 20 之间交替。

下面的插图显示结果虚线。 请注意，最后一段短划线不得不短于 25 个单位，以便线条的终点落在 (405, 5) 上。

钢笔

        Dim dashValues As Single() = {5, 2, 15, 4}
        Dim blackPen As New Pen(Color.Black, 5)
        blackPen.DashPattern = dashValues
        e.Graphics.DrawLine(blackPen, New Point(5, 5), New Point(405, 5))


float[] dashValues = { 5, 2, 15, 4 };
Pen blackPen = new Pen(Color.Black, 5);
blackPen.DashPattern = dashValues;
e.Graphics.DrawLine(blackPen, new Point(5, 5), new Point(405, 5));

编译代码

创建一个 Windows 窗体并处理窗体的 Paint 事件。 将上面的代码粘贴到 Paint 事件处理程序中。

请参见

其他资源

使用钢笔绘制线条和形状