GraphicsPath.CloseAllFigures 方法
定義
重要
部分資訊涉及發行前產品,在發行之前可能會有大幅修改。 Microsoft 對此處提供的資訊,不做任何明確或隱含的瑕疵擔保。
關閉此路徑中所有開啟的數位,並啟動新的圖形。 它會將一行從其端點連接到其起點,以關閉每個開啟的圖形。
public:
void CloseAllFigures();
public void CloseAllFigures ();
member this.CloseAllFigures : unit -> unit
Public Sub CloseAllFigures ()
範例
下列程式代碼範例的設計目的是要與 Windows Forms 搭配使用,而且需要 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