THPDFPage page-size demo projects

Složka Delphi PageSetup nyní odděluje příklady velikostí stránky podle praktické výstupní velikosti:

LargeSize předvádí QuadA0, DoubA0, A0, A1, A2, B0+, B0, B1, B2, ANSI-C/D/E, ARCH-C/D/E1/E, japonské formáty archů, velké fotografické formáty a stránku UserDefined o rozměrech 1024 x 768 mm

NormalSize demonstrates A3, Tabloid, Ledger, A4, Letter, A5, B3, B4, B5, medium photo sizes, ANSI-A/B, and ARCH-A/B.

SmallSize demonstrates A6-A10, B6-B10, business-card sizes, ISO 7810 ID/passport sizes, ID photo sizes, and small photo print sizes.

Existující názvy psXXX zůstávají kompatibilními aliasy. Nový kód by měl pro standardní velikosti upřednostňovat hodnoty enum velikosti stránky bez prefixu, například A0, A2, B2, B3, Tabloid, Ledger, ANSIC, ARCHD, USBC a P8R. UserDefined používejte pouze pro rozměry, které nejsou předdefinované

Tabloid má 11 x 17 palců. Ledger je formát 17 x 11 palců na šířku; Ledger nepovažujte za jiný název pro Tabloid na výšku

Názvy enum pro fotografické velikosti používají prefix P, když skutečná specifikace začíná číslicí. Například P5R představuje uživatelsky viditelnou fotografickou velikost 5R

Hodnoty řady B sledují existující konvenci HotPDF B4 / B5 a používají rozměry JIS B; psB4 a psB5 zůstávají podporovanými aliasy

Example:

program NormalSize;

{$APPTYPE CONSOLE}

uses

SysUtils,

HPDFDoc;

var

  HPDF: THotPDF;

begin

   HPDF:= THotPDF.Create( nil );

   try

       HPDF.AutoLaunch := true;                // PDF file will be shown automatically

       HPDF.FileName := 'NormalSize.pdf';  

       HPDF.PageLayout := plOneColumn; // Set one column viewer mode

       HPDF.BeginDoc;                              // Create PDF file

       HPDF.CurrentPage.Size := A3;                        // Prefer predefined standard sizes

       HPDF.CurrentPage.TextOut(10, 10, 0, 'A3 Size'); // Print text

       HPDF.AddPage;                                          // Add new page

       HPDF.CurrentPage.Size := B3;                        // JIS B3 page size

       HPDF.CurrentPage.TextOut(10, 10, 0, 'B3 Size'); // Print text

       HPDF.AddPage;                                                        // Add new page

       HPDF.CurrentPage.Size := P8R;                      // 8 x 10 inch photo page

       HPDF.CurrentPage.TextOut(10, 10, 0, '8R Photo Size'); // Print text

       HPDF.AddPage;                                                     // Add new page

       HPDF.CurrentPage.Size := Tabloid;                  // 11 x 17 inch Tabloid page size

       HPDF.CurrentPage.TextOut(10, 10, 0, 'Tabloid Size'); // Print text

       HPDF.AddPage;                                                     // Add new page

       HPDF.CurrentPage.Size := Ledger;                   // 17 x 11 inch Ledger page size

       HPDF.CurrentPage.TextOut(10, 10, 0, 'Ledger Size'); // Print text

       HPDF.EndDoc;                                                       // Close PDF file

   finally

       HPDF.Free;

   end;

end.