Proyectos de demostración de tamaño de página de THPDFPage

La carpeta PageSetup de Delphi ahora separa los ejemplos de tamaño de página según el tamaño práctico de salida:

LargeSize muestra QuadA0, DoubA0, A0, A1, A2, B0+, B0, B1, B2, ANSI-C/D/E, ARCH-C/D/E1/E, tamaños de hoja japoneses, tamaños fotográficos grandes y una página UserDefined de 1024 x 768 mm

NormalSize muestra A3, Tabloid, Ledger, A4, Letter, A5, B3, B4, B5, tamaños fotográficos medianos, ANSI-A/B y ARCH-A/B

SmallSize muestra A6-A10, B6-B10, tamaños de tarjeta de presentación, tamaños de identificación/pasaporte ISO 7810, tamaños de foto para identificación y tamaños de impresión fotográfica pequeños

Los nombres psXXX existentes siguen siendo alias compatibles. El código nuevo debería preferir valores de enumeración de tamaño de página sin prefijo como A0, A2, B2, B3, Tabloid, Ledger, ANSIC, ARCHD, USBC y P8R para tamaños estándar. Use UserDefined solo para dimensiones que no estén predefinidas

Tabloid mide 11 x 17 pulgadas. Ledger es el tamaño horizontal de 17 x 11 pulgadas; no trates Ledger como otro nombre para Tabloid vertical

Los nombres de enumeración de tamaños fotográficos usan el prefijo P cuando la especificación real empieza con un dígito. Por ejemplo, P5R representa el tamaño fotográfico 5R visible para el usuario

Los valores de la serie B siguen la convención existente de HotPDF para B4 / B5 y usan dimensiones JIS B; psB4 y psB5 siguen siendo alias compatibles

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.