THPDFPage.RoundRect

THPDFPage

InizioPrecedenteSuccessivo

Disegna sul canvas un rettangolo con gli angoli arrotondati.

Sintassi Delphi:

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

Sintassi C++:

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

Descrizione

Usa RoundRect per disegnare un rettangolo arrotondato. Il rettangolo avrà i lati definiti dai punti (X1,Y1), (X2,Y1), (X2,Y2), (X1,Y2), ma gli angoli verranno smussati per ottenere un aspetto arrotondato. La curva degli angoli arrotondati corrisponde alla curvatura di un'ellisse di larghezza X3 e altezza Y3.

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

Example di codice

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.