Phương thức THPDFPage.RoundRect

Dùng RoundRect để vẽ hình chữ nhật bo góc. Hình chữ nhật sẽ có các cạnh được xác định bởi các điểm (X1,Y1), (X2,Y1), (X2,Y2), (X1,Y2), nhưng các góc sẽ được cắt bớt để tạo cảm giác bo tròn. Độ cong của các góc bo tròn khớp với độ cong của một ellipse có chiều rộng X3 và chiều cao Y3

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

Ví dụ mã

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.