Vector graphics in PDF

Shapes
7/18/2014

Downloads

[Vector graphics in PDF.png]: /support/articles/1377/Vector graphics in PDF.png "Vector graphics in PDF.png" This code sample shows how to draw different vector graphics such as line, ellipses and bezier curves. It also demonstrates fills and line styles.

![Vector graphics in PDF.png]

Document document = new Document();
Page page = new Page( 600, 600 );
document.Pages.Add( page );

// create a Drawing and make it occupy all space within the margins of the page
ShapeCollection shapes = new ShapeCollection( 100, 100, 400, 400 );
page.Overlay.Add( shapes );

// coordinate (0, 0) lies at the bottom left of the shapes.

// draw a grid of 25 x 25 points
Pen gridPen = new Pen( System.Drawing.Color.LightGray, 1 );
for( double x = 0; x < shapes.Width; x += 25 )
{
    for( double y = 0; y < shapes.Height; y += 25 )
    {
    // Draw the lines
    shapes.Add( new LineShape( 0, y, shapes.Width, y, gridPen ) );
    shapes.Add( new LineShape( x, 0, x, shapes.Height, gridPen ) );

    // Add axis numbering
    shapes.Add( new TextShape( 0, y, y.ToString(), Font.Helvetica, 8 ) );
    shapes.Add( new TextShape( x, 0, x.ToString(), Font.Helvetica, 8 ) );
    }
}

// add a line
shapes.Add( new LineShape( 25, 25, 75, 50 ) );

// add an ellipse
shapes.Add( new EllipseShape( 150, 50, 50, 25 ) );

// add a rectangle
shapes.Add( new RectangleShape( 250, 25, 75, 50, new Pen( System.Drawing.Color.Black ), new SolidBrush( System.Drawing.Color.Yellow ) ) );

// add a few beziershapes
AddBezier( shapes,  25, 125,  25, 150,  50, 175,  75, 175 );
AddBezier( shapes, 100, 125, 100, 175, 125, 175, 150, 175 );
AddBezier( shapes, 175, 150, 175, 200, 225, 100, 225, 150 );
AddBezier( shapes, 250, 150, 300, 200, 250, 100, 300, 150 );

// draw one bezier without the helper lines
shapes.Add( new BezierShape( 325, 150, 375, 200, 325, 100, 375, 150 ) );

// add a few arcshapes
shapes.Add( new ArcShape(  50, 225, 25, 25 ) );
shapes.Add( new ArcShape( 125, 225, 25, 25, 0, 45 ) );
shapes.Add( new ArcShape( 200, 225, 25, 25, 0, 90 ) );
shapes.Add( new ArcShape( 275, 225, 25, 25, 90, 180 ) );

// add a few pieshapes
shapes.Add( new PieShape(  50, 300, 25, 25 ) );
shapes.Add( new PieShape( 125, 300, 25, 25, 0, 45 ) );
shapes.Add( new PieShape( 200, 300, 25, 25, 0, 45 ) );
shapes.Add( new PieShape( 275, 300, 25, 25, 90, 270 ) );

// add a multiline textshape         
MultilineTextShape multiLineText = new MultilineTextShape();
multiLineText.Fragments.Add( new Fragment( 
    "This example shows how to use the shapes primitives of PDFKit.NET. " + 
    "Shapes that are used in this sample are LineShape, EllipseShape, RectangleShape, " +
    "BezierShape, ArcShape, PieShape, TextShape and MultilineTextShape.") );
multiLineText.HorizontalAlignment = HorizontalAlignment.Center;
multiLineText.Dock = DockStyle.Top;
multiLineText.Margin.Left = multiLineText.Margin.Right = 50;
shapes.Add( multiLineText );

using( FileStream file = new FileStream( @"..\..\vectorgraphics.pdf", FileMode.Create, FileAccess.Write ) )
{
    document.Write( file);
}
Dim document As New Document()
Dim page As New Page(600, 600)
document.Pages.Add(page)

' create a Drawing and make it occupy all space within the margins of the page
Dim shapes As New ShapeCollection(100, 100, 400, 400)
page.Overlay.Add(shapes)

' coordinate (0, 0) lies at the bottom left of the shapes.

' draw a grid of 25 x 25 points
Dim gridPen As New Pen(System.Drawing.Color.LightGray, 1)
For x As Double = 0 To shapes.Width - 1 Step 25
	For y As Double = 0 To shapes.Height - 1 Step 25
		' Draw the lines
		shapes.Add(New LineShape(0, y, shapes.Width, y, gridPen))
		shapes.Add(New LineShape(x, 0, x, shapes.Height, gridPen))

		' Add axis numbering
		shapes.Add(New TextShape(0, y, y.ToString(), Font.Helvetica, 8))
		shapes.Add(New TextShape(x, 0, x.ToString(), Font.Helvetica, 8))
	Next
Next

' add a line
shapes.Add(New LineShape(25, 25, 75, 50))

' add an ellipse
shapes.Add(New EllipseShape(150, 50, 50, 25))

' add a rectangle
shapes.Add(New RectangleShape(250, 25, 75, 50, New Pen(System.Drawing.Color.Black), New SolidBrush(System.Drawing.Color.Yellow)))

' add a few beziershapes
AddBezier(shapes, 25, 125, 25, 150, 50, _
	175, 75, 175)
AddBezier(shapes, 100, 125, 100, 175, 125, _
	175, 150, 175)
AddBezier(shapes, 175, 150, 175, 200, 225, _
	100, 225, 150)
AddBezier(shapes, 250, 150, 300, 200, 250, _
	100, 300, 150)

' draw one bezier without the helper lines
shapes.Add(New BezierShape(325, 150, 375, 200, 325, 100, _
	375, 150))

' add a few arcshapes
shapes.Add(New ArcShape(50, 225, 25, 25))
shapes.Add(New ArcShape(125, 225, 25, 25, 0, 45))
shapes.Add(New ArcShape(200, 225, 25, 25, 0, 90))
shapes.Add(New ArcShape(275, 225, 25, 25, 90, 180))

' add a few pieshapes
shapes.Add(New PieShape(50, 300, 25, 25))
shapes.Add(New PieShape(125, 300, 25, 25, 0, 45))
shapes.Add(New PieShape(200, 300, 25, 25, 0, 45))
shapes.Add(New PieShape(275, 300, 25, 25, 90, 270))

' add a multiline textshape         
Dim multiLineText As New MultilineTextShape()
multiLineText.Fragments.Add(New Fragment("This example shows how to use the shapes primitives of PDFKit.NET. " & "Shapes that are used in this sample are LineShape, EllipseShape, RectangleShape, " & "BezierShape, ArcShape, PieShape, TextShape and MultilineTextShape."))
multiLineText.HorizontalAlignment = HorizontalAlignment.Center
multiLineText.Dock = DockStyle.Top
multiLineText.Margin.Left = 50
        multiLineText.Margin.Right = 50
shapes.Add(multiLineText)

Using file As New FileStream("..\..\vectorgraphics.pdf", FileMode.Create, FileAccess.Write)
	document.Write(New BinaryWriter(file))
End Using

Above, we make use of utility method for drawing bezier curves with additional helper lines.

private static void AddBezier( ShapeCollection shapes, 
    double x , double y, 
    double x1, double y1, 
    double x2, double y2, 
    double x3, double y3 )
{
    // Create the new bezier
    BezierShape bezier = new BezierShape( x, y, x1, y1, x2, y2, x3, y3 );

    // Add helper lines.
    AddBezierHelperShapes( shapes, bezier );

    // Add the bezier to the shapes
    shapes.Add( bezier );
}

private static void AddBezierHelperShapes( ShapeCollection shapes, BezierShape bezier ) 
{
    // Helper line from start point to start control point
    LineShape startLine = new LineShape( bezier.X0, bezier.Y0, bezier.X1, bezier.Y1 );
    startLine.Pen = new Pen( System.Drawing.Color.Green, 1, new DashPattern( 1, new double[] { 3, 1 } ) );
    shapes.Add( startLine );

    // Helper line from end control point to end point 
    LineShape endLine = new LineShape( bezier.X2, bezier.Y2, bezier.X3, bezier.Y3 );
    endLine.Pen = new Pen( System.Drawing.Color.Red, 1, new DashPattern( 1, new double[] { 3, 1 } ) );
    shapes.Add( endLine );
}
Private Shared Sub AddBezier(ByVal shapes As ShapeCollection, ByVal x As Double, ByVal y As Double, ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, _
	ByVal y2 As Double, ByVal x3 As Double, ByVal y3 As Double)
	' Create the new bezier
	Dim bezier As New BezierShape(x, y, x1, y1, x2, y2, _
		x3, y3)

	' Add helper lines.
	AddBezierHelperShapes(shapes, bezier)

	' Add the bezier to the shapes
	shapes.Add(bezier)
End Sub

Private Shared Sub AddBezierHelperShapes(ByVal shapes As ShapeCollection, ByVal bezier As BezierShape)
    ' Helper line from start point to start control point
    Dim startLine As New LineShape(bezier.X0, bezier.Y0, bezier.X1, bezier.Y1)
    startLine.Pen = New Pen(System.Drawing.Color.Green, 1, New DashPattern(1, New Double() {3, 1}))
    shapes.Add(startLine)

    ' Helper line from end control point to end point 
    Dim endLine As New LineShape(bezier.X2, bezier.Y2, bezier.X3, bezier.Y3)
    endLine.Pen = New Pen(System.Drawing.Color.Red, 1, New DashPattern(1, New Double() {3, 1}))
    shapes.Add(endLine)
End Sub