本文整理汇总了VB.NET中System.Drawing.Drawing2D.GraphicsPath.AddPath方法的典型用法代码示例。如果您正苦于以下问题:VB.NET GraphicsPath.AddPath方法的具体用法?VB.NET GraphicsPath.AddPath怎么用?VB.NET GraphicsPath.AddPath使用的例子?那么, 这里精选的方法代码示例或许可以为您提供帮助。
在下文中一共展示了GraphicsPath.AddPath方法的1个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: AddPathExample
Public Sub AddPathExample(ByVal e As PaintEventArgs)
' Creates a symetrical triangle and adds an inverted triangle.
' Create the first path - right side up triangle.
Dim myArray As Point() = {New Point(30, 30), New Point(60, 60), _
New Point(0, 60), New Point(30, 30)}
Dim myPath As New GraphicsPath
myPath.AddLines(myArray)
' Create the second path - inverted triangle.
Dim myArray2 As Point() = {New Point(30, 30), New Point(0, 0), _
New Point(60, 0), New Point(30, 30)}
Dim myPath2 As New GraphicsPath
myPath2.AddLines(myArray2)
' Add the second path to the first path.
myPath.AddPath(myPath2, True)
' Draw the combined path to the screen.
Dim myPen As New Pen(Color.Black, 2)
e.Graphics.DrawPath(myPen, myPath)
End Sub