GraphicsPath.CloseAllFigures 方法
定义
重要
一些信息与预发行产品相关,相应产品在发行之前可能会进行重大修改。 对于此处提供的信息,Microsoft 不作任何明示或暗示的担保。
关闭此路径中的所有打开的数字,并启动一个新数字。 它通过将一行从终结点连接到其起点来关闭每个打开的数字。
public:
void CloseAllFigures();
public void CloseAllFigures ();
member this.CloseAllFigures : unit -> unit
Public Sub CloseAllFigures ()
示例
下面的代码示例旨在与 Windows 窗体一起使用,它需要 PaintEventArgse
OnPaint 事件对象。 该代码执行以下操作:
创建路径。
将多个打开的数字添加到路径。
关闭路径中的所有数字。
绘制屏幕的路径。
private:
void CloseAllFiguresExample( PaintEventArgs^ e )
{
// Create a path containing several open-ended figures.
GraphicsPath^ myPath = gcnew GraphicsPath;
myPath->StartFigure();
myPath->AddLine( Point(10,10), Point(150,10) );
myPath->AddLine( Point(150,10), Point(10,150) );
myPath->StartFigure();
myPath->AddArc( 200, 200, 100, 100, 0, 90 );
myPath->StartFigure();
Point point1 = Point(300,300);
Point point2 = Point(400,325);
Point point3 = Point(400,375);
Point point4 = Point(300,400);
array<Point>^ points = {point1,point2,point3,point4};
myPath->AddCurve( points );
// Close all the figures.
myPath->CloseAllFigures();
// Draw the path to the screen.
e->Graphics->DrawPath( gcnew Pen( Color::Black,3.0f ), myPath );
}
private void CloseAllFiguresExample(PaintEventArgs e)
{
// Create a path containing several open-ended figures.
GraphicsPath myPath = new GraphicsPath();
myPath.StartFigure();
myPath.AddLine(new Point(10, 10), new Point(150, 10));
myPath.AddLine(new Point(150, 10), new Point(10, 150));
myPath.StartFigure();
myPath.AddArc(200, 200, 100, 100, 0, 90);
myPath.StartFigure();
Point point1 = new Point(300, 300);
Point point2 = new Point(400, 325);
Point point3 = new Point(400, 375);
Point point4 = new Point(300, 400);
Point[] points = {point1, point2, point3, point4};
myPath.AddCurve(points);
// Close all the figures.
myPath.CloseAllFigures();
// Draw the path to the screen.
e.Graphics.DrawPath(new Pen(Color.Black, 3), myPath);
}
Public Sub CloseAllFiguresExample(ByVal e As PaintEventArgs)
' Create a path containing several open-ended figures.
Dim myPath As New GraphicsPath
myPath.StartFigure()
myPath.AddLine(New Point(10, 10), New Point(150, 10))
myPath.AddLine(New Point(150, 10), New Point(10, 150))
myPath.StartFigure()
myPath.AddArc(200, 200, 100, 100, 0, 90)
myPath.StartFigure()
Dim point1 As New Point(300, 300)
Dim point2 As New Point(400, 325)
Dim point3 As New Point(400, 375)
Dim point4 As New Point(300, 400)
Dim points As Point() = {point1, point2, point3, point4}
myPath.AddCurve(points)
' close all the figures.
myPath.CloseAllFigures()
' Draw the path to the screen.
e.Graphics.DrawPath(New Pen(Color.Black, 3), myPath)
End Sub