GdPicture.NET.14
GdPicture14 Namespace / GdPicturePDF Class / SetLineWidth Method
The thickness, expressed in the current units defined in the PDF document, of paths to be stroked. Initial value is 1.0.
Example





In This Topic
SetLineWidth Method (GdPicturePDF)
In This Topic
Sets the line width (the line thickness, or in other words the pen size) used by all subsequent stroking operations, like the GdPicturePDF.DrawLine method or the GdPicturePDF.DrawRectangle method. The specified value need to be expressed in the current units defined in the PDF document. The initial value is set to 1.0.

The line width 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").

You can use the GdPicturePDF.GetMeasurementUnit method to determine the currently defined units and you can use the GdPicturePDF.SetMeasurementUnit method to reset the units according to your preference.

Syntax
'Declaration
 

Public Function SetLineWidth( _
   ByVal LineWidth As Single _
) As GdPictureStatus
public GdPictureStatus SetLineWidth( 
   float LineWidth
)
public function SetLineWidth( 
    LineWidth: Single
): GdPictureStatus; 
public function SetLineWidth( 
   LineWidth : float
) : GdPictureStatus;
public: GdPictureStatus SetLineWidth( 
   float LineWidth
) 
public:
GdPictureStatus SetLineWidth( 
   float LineWidth
)

Parameters

LineWidth
The thickness, expressed in the current units defined in the PDF document, of paths to be stroked. Initial value is 1.0.

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 width to draw various rectangles. 
Dim caption As String = "Example: SetLineWidth"
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(0, 0, 255) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.SetFillColor(0, 255, 255) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.DrawRectangle(10, 10, 40, 20, True, True) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.SetLineWidth(5) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.DrawRectangle(80, 10, 40, 20, True, True) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.SetLineWidth(2) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.SetLineDash(5, 3) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.DrawRectangle(150, 10, 40, 20, True, True) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.SetLineNoDash() = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.SetLineColor(255, 0, 0) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.SetLineWidth(0) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.DrawRectangle(10, 50, 40, 20, True, True) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.SetLineWidth(3) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.DrawRectangle(80, 50, 40, 20, True, True) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.SetLineWidth(1) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.SetLineDash(New Single() {2, 1, 1, 1}) = GdPictureStatus.OK) AndAlso
       (gdpicturePDF.DrawRectangle(150, 50, 40, 20, True, True) = GdPictureStatus.OK) Then
        status = gdpicturePDF.SaveToFile("test_Lines.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: SetLineWidth";
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(0, 0, 255) == GdPictureStatus.OK) &&
        (gdpicturePDF.SetFillColor(0, 255, 255) == GdPictureStatus.OK) &&
        (gdpicturePDF.DrawRectangle(10, 10, 40, 20, true, true) == GdPictureStatus.OK) &&
        (gdpicturePDF.SetLineWidth(5) == GdPictureStatus.OK) &&
        (gdpicturePDF.DrawRectangle(80, 10, 40, 20, true, true) == GdPictureStatus.OK) &&
        (gdpicturePDF.SetLineWidth(2) == GdPictureStatus.OK) &&
        (gdpicturePDF.SetLineDash(5, 3) == GdPictureStatus.OK) &&
        (gdpicturePDF.DrawRectangle(150, 10, 40, 20, true, true) == GdPictureStatus.OK) &&
        (gdpicturePDF.SetLineNoDash() == GdPictureStatus.OK) &&
        (gdpicturePDF.SetLineColor(255, 0, 0) == GdPictureStatus.OK) &&
        (gdpicturePDF.SetLineWidth(0) == GdPictureStatus.OK) &&
        (gdpicturePDF.DrawRectangle(10, 50, 40, 20, true, true) == GdPictureStatus.OK) &&
        (gdpicturePDF.SetLineWidth(3) == GdPictureStatus.OK) &&
        (gdpicturePDF.DrawRectangle(80, 50, 40, 20, true, true) == GdPictureStatus.OK) &&
        (gdpicturePDF.SetLineWidth(1) == GdPictureStatus.OK) &&
        (gdpicturePDF.SetLineDash(new float[] {2, 1, 1, 1}) == GdPictureStatus.OK) &&
        (gdpicturePDF.DrawRectangle(150, 50, 40, 20, true, true) == GdPictureStatus.OK))
    {
        status = gdpicturePDF.SaveToFile("test_Lines.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();
Example
How to set the different line width to draw various rectangles. Dim caption As String = "Example: SetLineWidth" 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(0, 0, 255) = GdPictureStatus.OK) AndAlso (gdpicturePDF.SetFillColor(0, 255, 255) = GdPictureStatus.OK) AndAlso (gdpicturePDF.DrawRectangle(10, 10, 40, 20, True, True) = GdPictureStatus.OK) AndAlso (gdpicturePDF.SetLineWidth(5) = GdPictureStatus.OK) AndAlso (gdpicturePDF.DrawRectangle(80, 10, 40, 20, True, True) = GdPictureStatus.OK) AndAlso (gdpicturePDF.SetLineWidth(2) = GdPictureStatus.OK) AndAlso (gdpicturePDF.SetLineDash(5, 3) = GdPictureStatus.OK) AndAlso (gdpicturePDF.DrawRectangle(150, 10, 40, 20, True, True) = GdPictureStatus.OK) AndAlso (gdpicturePDF.SetLineNoDash() = GdPictureStatus.OK) AndAlso (gdpicturePDF.SetLineColor(255, 0, 0) = GdPictureStatus.OK) AndAlso (gdpicturePDF.SetLineWidth(0) = GdPictureStatus.OK) AndAlso (gdpicturePDF.DrawRectangle(10, 50, 40, 20, True, True) = GdPictureStatus.OK) AndAlso (gdpicturePDF.SetLineWidth(3) = GdPictureStatus.OK) AndAlso (gdpicturePDF.DrawRectangle(80, 50, 40, 20, True, True) = GdPictureStatus.OK) AndAlso (gdpicturePDF.SetLineWidth(1) = GdPictureStatus.OK) AndAlso (gdpicturePDF.SetLineDash(New Single() {2, 1, 1, 1}) = GdPictureStatus.OK) AndAlso (gdpicturePDF.DrawRectangle(150, 50, 40, 20, True, True) = GdPictureStatus.OK) Then status = gdpicturePDF.SaveToFile("test_Lines.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: SetLineWidth"; 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(0, 0, 255) == GdPictureStatus.OK) && (gdpicturePDF.SetFillColor(0, 255, 255) == GdPictureStatus.OK) && (gdpicturePDF.DrawRectangle(10, 10, 40, 20, true, true) == GdPictureStatus.OK) && (gdpicturePDF.SetLineWidth(5) == GdPictureStatus.OK) && (gdpicturePDF.DrawRectangle(80, 10, 40, 20, true, true) == GdPictureStatus.OK) && (gdpicturePDF.SetLineWidth(2) == GdPictureStatus.OK) && (gdpicturePDF.SetLineDash(5, 3) == GdPictureStatus.OK) && (gdpicturePDF.DrawRectangle(150, 10, 40, 20, true, true) == GdPictureStatus.OK) && (gdpicturePDF.SetLineNoDash() == GdPictureStatus.OK) && (gdpicturePDF.SetLineColor(255, 0, 0) == GdPictureStatus.OK) && (gdpicturePDF.SetLineWidth(0) == GdPictureStatus.OK) && (gdpicturePDF.DrawRectangle(10, 50, 40, 20, true, true) == GdPictureStatus.OK) && (gdpicturePDF.SetLineWidth(3) == GdPictureStatus.OK) && (gdpicturePDF.DrawRectangle(80, 50, 40, 20, true, true) == GdPictureStatus.OK) && (gdpicturePDF.SetLineWidth(1) == GdPictureStatus.OK) && (gdpicturePDF.SetLineDash(new float[] {2, 1, 1, 1}) == GdPictureStatus.OK) && (gdpicturePDF.DrawRectangle(150, 50, 40, 20, true, true) == GdPictureStatus.OK)) { status = gdpicturePDF.SaveToFile("test_Lines.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

Reference

GdPicturePDF Class
GdPicturePDF Members
DrawLine Method
DrawRectangle Method
GetMeasurementUnit Method
SetMeasurementUnit Method
SetMeasurementUnit Method
SetOrigin Method
SetLineColor(Byte,Byte,Byte) Method
SetLineDash Method
SetLineNoDash Method
ResetGraphicsState Method

 

 

Ⓒ Copyright 2024 Nutrient. All rights reserved