THPDFPage.Rectangle

THPDFPage

 

Atas  Sebelumnya  Berikutnya

Menggambar persegi panjang

 

Sintaks Delphi:

procedure Rectangle ( X, Y, Width, Height: Single );

 

Sintaks C++:

void __fastcall Rectangle ( float X, float Y, float Width, float Height );

 

Deskripsi

Gunakan Rectangle untuk menggambar persegi panjang. Tentukan koordinat dan ukuran persegi panjang. Coordinates menentukan sudut kiri atas pada titik ( X, Y) serta lebar dan tinggi

Untuk mengisi wilayah persegi panjang gunakan Fill. Untuk membuat garis luar wilayah persegi panjang tanpa mengisinya, gunakan Stroke. Untuk menggambar persegi panjang bersudut membulat, gunakan RoundRect

 

Contoh kode

program HelloWorld;
{$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 := 'Rectangle.pdf';                   // Set PDF filename
        HPDF.BeginDoc;                                               // Create PDF file
        HPDF.CurrentPage.Rectangle( 10, 10, 100, 100 ); // Draw rectangle and fill
        HPDF.CurrentPage.ClosePathEoFillAndStroke;
        HPDF.EndDoc;                                                  // Close PDF file
    finally
        HPDF.Free;
    end;
end.