通过

如何：绘制贝塞尔样条序列

  • 项目

可以使用 DrawBeziers 类的 Graphics 方法绘制一系列连接的贝塞尔自由绘制曲线。

示例

以下示例绘制一条由两条连接的贝塞尔自由绘制曲线组成的曲线。 第一条贝塞尔自由绘制曲线的终点是另一条贝塞尔自由绘制曲线的起点。

下图显示了连接的曲线以及七个点：

图形显示了连接的自由绘制曲线以及七个点。

Point[] p = {
   new Point(10, 100),   // start point of first spline
   new Point(75, 10),    // first control point of first spline
   new Point(80, 50),    // second control point of first spline

   new Point(100, 150),  // endpoint of first spline and
                         // start point of second spline

   new Point(125, 80),   // first control point of second spline
   new Point(175, 200),  // second control point of second spline
   new Point(200, 80)};  // endpoint of second spline

Pen pen = new Pen(Color.Blue);
e.Graphics.DrawBeziers(pen, p);


' Point(10, 100) = start point of first spline
' Point(75, 10) = first control point of first spline
' Point(80, 50) = second control point of first spline

' Point(100, 150) = endpoint of first spline and start point of second spline

' Point(125, 80) = first control point of second spline
' Point(175, 200) = second control point of second spline
' Point(200, 80)} = endpoint of second spline
Dim p As Point() = { _
       New Point(10, 100), _
       New Point(75, 10), _
       New Point(80, 50), _
       New Point(100, 150), _
       New Point(125, 80), _
       New Point(175, 200), _
       New Point(200, 80)}

Dim pen As New Pen(Color.Blue)
e.Graphics.DrawBeziers(pen, p)

编译代码

前面的示例专用于 Windows 窗体，它需要 PaintEventArgse，这是 Paint 事件处理程序的参数。

另请参阅