A color object that defines the new line color. Initial value: black.
Example





In This Topic
GdPicture14 Namespace / GdPicturePDF Class / SetLineColor Method / SetLineColor(GdPictureColor) Method

SetLineColor(GdPictureColor) Method

In This Topic
Sets the line color used by all subsequent stroking operations, like the GdPicturePDF.DrawLine method or the GdPicturePDF.DrawRectangle method. The initial value is set to black.

The line (stroke) color parameter is one of the graphics state parameters. These parameters are initialized to their default values at the beginning of each page (see PDF Reference, Section "Graphics State").

Syntax
'Declaration

 

Public Overloads Function SetLineColor( _

   ByVal LineColor As GdPictureColor _

) As GdPictureStatus
public GdPictureStatus SetLineColor( 

   GdPictureColor LineColor

)
public function SetLineColor( 

    LineColor: GdPictureColor

): GdPictureStatus; 
public function SetLineColor( 

   LineColor : GdPictureColor

) : GdPictureStatus;
public: GdPictureStatus SetLineColor( 

   GdPictureColor LineColor

) 
public:

GdPictureStatus SetLineColor( 

   GdPictureColor LineColor

) 

Parameters

LineColor
A color object that defines the new line color. Initial value: black.

Return Value

A member of the GdPictureStatus enumeration. If the method has been successfully followed, then the return value is GdPictureStatus.OK.

We strongly recommend always checking this status first.

Remarks
This method is only allowed for use with non-encrypted documents.

Be aware also that graphics state parameters are initialized to their default values at the beginning of each page.

Example
How to set the different line colors to draw various rectangles.
Dim caption As String = "Example: SetLineColor"

Dim gdpicturePDF As New GdPicturePDF()

Dim status As GdPictureStatus = gdpicturePDF.NewPDF()

If status = GdPictureStatus.OK Then

    gdpicturePDF.SetOrigin(PdfOrigin.PdfOriginTopLeft)

    gdpicturePDF.SetMeasurementUnit(PdfMeasurementUnit.PdfMeasurementUnitMillimeter)

    If (gdpicturePDF.NewPage(210, 297) = GdPictureStatus.OK) AndAlso

       (gdpicturePDF.ResetGraphicsState() = GdPictureStatus.OK) AndAlso 'The default graphics state is set.

       (gdpicturePDF.SetLineWidth(1) = GdPictureStatus.OK) AndAlso

       (gdpicturePDF.SetLineColor(Color.Blue) = GdPictureStatus.OK) AndAlso

       (gdpicturePDF.SetFillColor(Color.Cyan) = GdPictureStatus.OK) AndAlso

       (gdpicturePDF.DrawRectangle(10, 20, 40, 20, True, True) = GdPictureStatus.OK) AndAlso

       (gdpicturePDF.SetLineWidth(3) = GdPictureStatus.OK) AndAlso

       (gdpicturePDF.SetLineColor(Color.Red) = GdPictureStatus.OK) AndAlso

       (gdpicturePDF.SetFillColor(Color.Bisque) = GdPictureStatus.OK) AndAlso

       (gdpicturePDF.DrawRectangle(80, 20, 40, 20, True, True) = GdPictureStatus.OK) AndAlso

       (gdpicturePDF.SetLineWidth(5) = GdPictureStatus.OK) AndAlso

       (gdpicturePDF.SetLineColor(Color.Chocolate) = GdPictureStatus.OK) AndAlso

       (gdpicturePDF.SetFillColor(Color.Fuchsia) = GdPictureStatus.OK) AndAlso

       (gdpicturePDF.DrawRectangle(150, 20, 40, 20, True, True) = GdPictureStatus.OK) Then

        status = gdpicturePDF.SaveToFile("test_LineColor.pdf")

        If status = GdPictureStatus.OK Then

            MessageBox.Show("The example has been followed successfully and the file has been saved.", caption)

        Else

            MessageBox.Show("The example has been followed successfully, but the file can't be saved. Status: " + status.ToString(), caption)

        End If

    Else

        MessageBox.Show("The example has not been followed successfully." + vbCrLf + "The last known status is " + gdpicturePDF.GetStat().ToString(), caption)

    End If

Else

     MessageBox.Show("The NewPDF() method has failed with the status: " + status.ToString(), caption)

End If

gdpicturePDF.Dispose()
string caption = "Example: SetLineColor";

GdPicturePDF gdpicturePDF = new GdPicturePDF();

GdPictureStatus status = gdpicturePDF.NewPDF();

if (status == GdPictureStatus.OK)

{

    gdpicturePDF.SetOrigin(PdfOrigin.PdfOriginTopLeft);

    gdpicturePDF.SetMeasurementUnit(PdfMeasurementUnit.PdfMeasurementUnitMillimeter);

    if ((gdpicturePDF.NewPage(210, 297) == GdPictureStatus.OK) &&

        (gdpicturePDF.ResetGraphicsState() == GdPictureStatus.OK) && //The default graphics state is set.

        (gdpicturePDF.SetLineWidth(1) == GdPictureStatus.OK) &&

        (gdpicturePDF.SetLineColor(Color.Blue) == GdPictureStatus.OK) &&

        (gdpicturePDF.SetFillColor(Color.Cyan) == GdPictureStatus.OK) &&

        (gdpicturePDF.DrawRectangle(10, 20, 40, 20, true, true) == GdPictureStatus.OK) &&

        (gdpicturePDF.SetLineWidth(3) == GdPictureStatus.OK) &&

        (gdpicturePDF.SetLineColor(Color.Red) == GdPictureStatus.OK) &&

        (gdpicturePDF.SetFillColor(Color.Bisque) == GdPictureStatus.OK) &&

        (gdpicturePDF.DrawRectangle(80, 20, 40, 20, true, true) == GdPictureStatus.OK) &&

        (gdpicturePDF.SetLineWidth(5) == GdPictureStatus.OK) &&

        (gdpicturePDF.SetLineColor(Color.Chocolate) == GdPictureStatus.OK) &&

        (gdpicturePDF.SetFillColor(Color.Fuchsia) == GdPictureStatus.OK) &&

        (gdpicturePDF.DrawRectangle(150, 20, 40, 20, true, true) == GdPictureStatus.OK))

    {

        status = gdpicturePDF.SaveToFile("test_LineColor.pdf");

        if (status == GdPictureStatus.OK)

            MessageBox.Show("The example has been followed successfully and the file has been saved.", caption);

        else

            MessageBox.Show("The example has been followed successfully, but the file can't be saved. Status: " + status.ToString(), caption);

    }

    else

        MessageBox.Show("The example has not been followed successfully.\nThe last known status is " + gdpicturePDF.GetStat().ToString(), caption);

}

else

    MessageBox.Show("The NewPDF() method has failed with the status: " + status.ToString(), caption);

gdpicturePDF.Dispose();
See Also