THPDFPage page-size demo projects

A pasta Delphi PageSetup separa agora exemplos de tamanho de página por tamanho prático de saída:

LargeSize demonstra QuadA0, DoubA0, A0, A1, A2, B0+, B0, B1, B2, ANSI-C/D/E, ARCH-C/D/E1/E, tamanhos de folha japoneses, grandes tamanhos fotográficos e uma página UserDefined de 1024 x 768 mm

NormalSize demonstra A3, Tabloid, Ledger, A4, Letter, A5, B3, B4, B5, tamanhos fotográficos médios, ANSI-A/B e ARCH-A/B

SmallSize demonstra A6-A10, B6-B10, tamanhos de cartão de visita, tamanhos de identificação/passaporte ISO 7810, tamanhos fotográficos de identificação e pequenos tamanhos de impressão fotográfica

Os nomes psXXX existentes continuam a ser aliases compatíveis. O novo código deve preferir valores de enumeração de tamanho de página sem prefixo, como A0, A2, B2, B3, Tabloid, Ledger, ANSIC, ARCHD, USBC e P8R, para tamanhos standard. Utilize UserDefined apenas para dimensões que não estejam predefinidas

Tabloid mede 11 x 17 polegadas. Ledger é o tamanho 17 x 11 em orientação horizontal; não trate Ledger como outro nome para Tabloid em orientação vertical

Os nomes de enumeração de tamanhos fotográficos usam um prefixo P quando a especificação real começa com um dígito. Por exemplo, P5R representa o tamanho fotográfico 5R visível ao utilizador

Os valores da série B seguem a convenção HotPDF B4 / B5 existente e usam dimensões JIS B; psB4 e psB5 continuam a ser aliases suportados

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.