|
THPDFPage-Demoprojekte für Seitengrößen Der Delphi-Ordner PageSetup trennt nun Seitengrößenbeispiele nach praktischer Ausgabegröße: LargeSize demonstriert QuadA0, DoubA0, A0, A1, A2, B0+, B0, B1, B2, ANSI-C/D/E, ARCH-C/D/E1/E, japanische Blattgrößen, große Fotogrößen und eine benutzerdefinierte (UserDefined) Seite mit 1024 x 768 mm NormalSize demonstriert A3, Tabloid, Ledger, A4, Letter, A5, B3, B4, B5, mittlere Fotogrößen, ANSI-A/B und ARCH-A/B SmallSize demonstriert A6-A10, B6-B10, Visitenkartengrößen, ISO 7810 ID-/Reisepassgrößen, ID-Fotogrößen und kleine Fotodruckgrößen Bestehende psXXX-Namen bleiben als kompatible Aliase erhalten. Neuer Code sollte präfixfreie Seitengrößen-Enum-Werte wie A0, A2, B2, B3, Tabloid, Ledger, ANSIC, ARCHD, USBC und P8R für Standardgrößen bevorzugen. Verwenden Sie UserDefined nur für Abmessungen, die nicht vordefiniert sind Tabloid ist 11 x 17 Zoll. Ledger ist das Querformat 17 x 11 Zoll; behandeln Sie Ledger nicht als einen anderen Namen für Hochformat-Tabloid Foto-Enum-Namen verwenden ein P-Präfix, wenn die reale Spezifikation mit einer Ziffer beginnt – zum Beispiel repräsentiert P5R die benutzerseitige Fotogröße 5R Die Werte der B-Serie folgen der bestehenden HotPDF-Konvention für B4 / B5 und verwenden JIS-B-Abmessungen; psB4 und psB5 bleiben unterstützte Aliase Beispiel: 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.
|