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
適用於
意見反應
https://aka.ms/ContentUserFeedback。
即將登場:在 2024 年,我們將逐步淘汰 GitHub 問題作為內容的意見反應機制,並將它取代為新的意見反應系統。 如需詳細資訊,請參閱:提交並檢視相關的意見反應