HotPDF-dokumentasjon
Hjem Innhold Oversikt

 

THPDFPage.RoundRect

THPDFPage

 

 Øverst  Forrige  Neste

Tegner et rektangel med avrundede hjørner på lerretet.

 

Delphi-syntaks:

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

 

C++-syntaks:

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

 

Beskrivelse

 

Bruk RoundRect til å tegne et avrundet rektangel. Rektangelet får kanter som er definert av punktene (X1,Y1), (X2,Y1), (X2,Y2) og (X1,Y2), men hjørnene skjæres av for å gi et avrundet utseende. Kurven i de avrundede hjørnene samsvarer med krumningen til en ellipse med bredde X3 og høyde Y3.

 

For å tegne en ellipse i stedet bruker du Ellipse. For å tegne et ekte rektangel bruker du Rectangle.

 

Kodeeksempel

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.