THPDFPage.DrawArc

THPDFPage

Zeichnet einen Bogen entlang des Umfangs der Ellipse, die durch das angegebene Rechteck begrenzt wird

Delphi-Syntax:

function DrawArc( X1, Y1, X2, Y2, X3, Y3, X4, Y4: Single ):TCurrPoint;

THPDFCurrPoint defines a point in page coordinates

Unit
HPDFDoc

type
    THPDFCurrPoint = record
        X: Extended;
        Y: Extended;
    end;

Description:
The THPDFCurrPoint type defines a location on the PDF page. X specifies the horizontal coordinate and Y specifies the vertical coordinate.

C++-Syntax:

TCurrPoint __fastcall DrawArc( float X1, float Y1, float X2, float Y2, float X3, float Y3, float X4, float Y4 );

Beschreibung

Verwenden Sie DrawArc, um eine elliptisch gekrümmte Linie zu zeichnen. Der Bogen verläuft entlang des Umfangs einer Ellipse, die durch die Punkte (X1,Y1) und (X2,Y2) begrenzt ist. Der Bogen wird gegen den Uhrzeigersinn entlang des Umfangs der Ellipse vom Startpunkt zum Endpunkt gezeichnet. Der Startpunkt ist definiert durch den Schnittpunkt der Ellipse mit einer Linie, die durch den Mittelpunkt der Ellipse und (X3,Y3) definiert wird. Der Endpunkt ist definiert durch den Schnittpunkt der Ellipse mit einer Linie, die durch den Mittelpunkt der Ellipse und (X4,Y4) definiert wird

program ArcExample;
{$APPTYPE CONSOLE}
uses
    SysUtils, Graphics, Classes, HPDFDoc;
var
    HPDF: THotPDF;
begin
    HPDF := THotPDF.Create( nil );
    try
        HPDF.AutoLaunch := true;                                                    // PDF file will be shown automatically
        HPDF.FileName := '.\Curve.pdf';                                             // Set PDF filename
        HPDF.BeginDoc;                                                              // Create PDF file
        HPDF.CurrentPage.DrawArc(10, 10, 110, 110, 50, 10, 10, 50); // Draw Arc
        HPDF.CurrentPage.Stroke;                                                    // Stroke curve
        HPDF.EndDoc;                                                                // Close PDF file
    finally
        HPDF.Free;
    end;
end.