THPDFPage.RoundRect

THPDFPage

 

Boven  Vorige  Volgende

Tekent een rechthoek met afgeronde hoeken op het canvas

 

Delphi-syntaxis:

procedure RoundRect ( X1, Y1, X2, Y2, X3, Y3: Integer );

 

C++-syntaxis:

void __fastcall RoundRect ( int X1, int Y1, int X2, int Y2, int X3, int Y3);

 

Beschrijving

 

Gebruik RoundRect om een rechthoek met afgeronde hoeken te tekenen. De rechthoek heeft randen die worden bepaald door de punten (X1,Y1), (X2,Y1), (X2,Y2), (X1,Y2), maar de hoeken worden afgesneden om een afgeronde vorm te creƫren. De kromme van de afgeronde hoeken komt overeen met de kromming van een ellips met breedte X3 en hoogte Y3

 

To draw an ellipse instead, use Ellipse. To draw a true rectangle, use Rectangle.

 

Codevoorbeeld

program RoundRect;
{$APPTYPE CONSOLE}
uses
    SysUtils, Graphics, Classes, HPDFDoc;

var
    HPDF: THotPDF;

const
    DashArray: array[0..3] of Byte = (6, 4, 2, 4);

begin
    HPDF := THotPDF.Create(nil);
    try
        HPDF.AutoLaunch := true;                  // PDF file will be shown automatically
        HPDF.FileName := '\RoundRect.pdf';   // Set PDF filename
        HPDF.BeginDoc;                                // Create PDF file

        HPDF.CurrentPage.SetDash( DashArray, 0 );                    // Set  - . -  dash pattern
        HPDF.CurrentPage.RoundRect( 10, 10, 200, 100, 20, 20 ); // Draw round rect
        HPDF.CurrentPage.Stroke;                                              // and stroke

        HPDF.EndDoc;                         // Close PDF file
    finally
        HPDF.Free;
    end;
end.