|
Draws a rectangle with rounded corners on the canvas.
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
Usare RoundRect per disegnare un rettangolo arrotondato. Il rettangolo avrà lati definiti dai punti (X1,Y1), (X2,Y1), (X2,Y2), (X1,Y2), ma gli angoli saranno smussati per creare un aspetto arrotondato. La curva degli angoli arrotondati corrisponde alla curvatura di un'ellisse con 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.
|