Projekty demonstracyjne rozmiarów stron THPDFPage

Folder Delphi PageSetup rozdziela teraz przykłady rozmiarów stron według praktycznego rozmiaru wyjściowego:

LargeSize demonstruje QuadA0, DoubA0, A0, A1, A2, B0+, B0, B1, B2, ANSI-C/D/E, ARCH-C/D/E1/E, japońskie rozmiary arkuszy, duże rozmiary zdjęć oraz stronę UserDefined 1024 x 768 mm.

NormalSize demonstruje A3, Tabloid, Ledger, A4, Letter, A5, B3, B4, B5, średnie rozmiary zdjęć, ANSI-A/B oraz ARCH-A/B.

SmallSize demonstruje A6-A10, B6-B10, rozmiary wizytówek, rozmiary ID/paszport ISO 7810, rozmiary zdjęć ID oraz małe rozmiary odbitek fotograficznych.

Istniejące nazwy psXXX pozostają zgodnymi aliasami. Nowy kod powinien preferować wartości enum rozmiaru strony bez prefiksu, takie jak A0, A2, B2, B3, Tabloid, Ledger, ANSIC, ARCHD, USBC i P8R dla standardowych rozmiarów. Używaj UserDefined tylko dla wymiarów, które nie są predefiniowane.

Tabloid ma 11 x 17 cali. Ledger to poziomy rozmiar 17 x 11 cali; nie traktuj Ledger jako innej nazwy pionowego Tabloid.

Nazwy enum rozmiarów fotograficznych używają prefiksu P, gdy rzeczywista specyfikacja zaczyna się od cyfry. Na przykład P5R reprezentuje widoczny dla użytkownika rozmiar zdjęcia 5R.

Wartości serii B zachowują istniejącą konwencję HotPDF B4 / B5 i używają wymiarów JIS B; psB4 i psB5 pozostają obsługiwanymi aliasami.

Przykład:

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.