Projets de démonstration des formats de page THPDFPage

Le dossier Delphi PageSetup sépare désormais les exemples de formats de page par taille de sortie pratique

LargeSize illustre QuadA0, DoubA0, A0, A1, A2, B0+, B0, B1, B2, ANSI-C/D/E, ARCH-C/D/E1/E, les formats de feuille japonais, les grands formats photo et une page UserDefined de 1024 x 768 mm

NormalSize illustre A3, Tabloid, Ledger, A4, Letter, A5, B3, B4, B5, les formats photo intermédiaires, ANSI-A/B et ARCH-A/B

SmallSize illustre A6-A10, B6-B10, les formats carte de visite, les formats carte d’identité/passeport ISO 7810, les formats photo d’identité et les petits formats photo

Les noms psXXX existants restent des alias compatibles. Le nouveau code doit privilégier les valeurs d’énumération de taille de page sans préfixe comme A0, A2, B2, B3, Tabloid, Ledger, ANSIC, ARCHD, USBC et P8R pour les tailles standard. Utilisez UserDefined uniquement pour les dimensions qui ne sont pas prédéfinies

Tabloid mesure 11 x 17 pouces. Ledger correspond au format paysage 17 x 11 pouces ; ne traitez pas Ledger comme un autre nom du Tabloid portrait

Les noms d’énumération des formats photo utilisent un préfixe P lorsque la spécification réelle commence par un chiffre. Par exemple, P5R représente le format photo 5R visible par l’utilisateur

Les valeurs de la série B suivent la convention HotPDF B4 / B5 existante et utilisent les dimensions JIS B ; psB4 et psB5 restent des alias pris en charge

Exemple :

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.