THPDFPage page-size demo projects

يفصل مجلد Delphi PageSetup الآن أمثلة حجم الصفحة حسب حجم المخرجات العملي:

LargeSize يستعرض QuadA0، و DoubA0، و A0، و A1، و A2، و B0+، و B0، و B1، و B2، و ANSI-C/D/E، و ARCH-C/D/E1/E، وأحجام الأوراق اليابانية، وأحجام الصور الكبيرة، وصفحة UserDefined بمقاس 1024 × 768 ملم

NormalSize يستعرض A3، و Tabloid، و Ledger، و A4، و Letter، و A5، و B3، و B4، و B5، وأحجام الصور المتوسطة، و ANSI-A/B، و ARCH-A/B

SmallSize يستعرض A6-A10، و B6-B10، وأحجام بطاقات العمل، وأحجام الهوية/جواز السفر ISO 7810، وأحجام صور الهوية، وأحجام طباعة الصور الصغيرة

تظل أسماء psXXX الحالية أسماء مستعارة متوافقة؛ يجب أن يفضل الكود الجديد قيم تعداد حجم الصفحة بدون بادئة مثل A0، و A2، و B2، و B3، و Tabloid، و Ledger، و ANSIC، و ARCHD، و USBC، و P8R للأحجام القياسية؛ واستخدم UserDefined فقط للأبعاد غير المحددة مسبقًا

يبلغ حجم Tabloid مقاس 11 × 17 بوصة؛ بينما Ledger هو الحجم الأفقي 17 × 11 بوصة؛ ولا تعامل Ledger كاسم آخر لحجم Tabloid الرأسي

تستخدم أسماء تعداد حجم الصور البادئة P عندما تبدأ المواصفات الحقيقية برقم؛ على سبيل المثال، يمثل P5R حجم الصور 5R الموجه للمستخدم

تتبع قيم السلسلة B اتفاقية HotPDF B4 / B5 الحالية وتستخدم أبعاد JIS B؛ وتظل psB4 و psB5 أسماء مستعارة مدعومة

مثال:

program NormalSize;

{$APPTYPE CONSOLE}

uses

SysUtils,

HPDFDoc;

var

  HPDF: THotPDF;

begin

   HPDF:= THotPDF.Create( nil );

   try

       HPDF.AutoLaunch := true;                // سيتم عرض ملف PDF تلقائيًا

       HPDF.FileName := 'NormalSize.pdf';  

       HPDF.PageLayout := plOneColumn; // تعيين وضع عرض العمود الواحد

       HPDF.BeginDoc;                              // إنشاء ملف PDF

       HPDF.CurrentPage.Size := A3;                        // تفضيل الأحجام القياسية المحددة مسبقًا

       HPDF.CurrentPage.TextOut(10, 10, 0, 'A3 Size'); // طباعة النص

       HPDF.AddPage;                                          // إضافة صفحة جديدة

       HPDF.CurrentPage.Size := B3;                        // حجم صفحة JIS B3

       HPDF.CurrentPage.TextOut(10, 10, 0, 'B3 Size'); // طباعة النص

       HPDF.AddPage;                                                        // إضافة صفحة جديدة

       HPDF.CurrentPage.Size := P8R;                      // صفحة صور بمقاس 8 × 10 بوصة

       HPDF.CurrentPage.TextOut(10, 10, 0, '8R Photo Size'); // طباعة النص

       HPDF.AddPage;                                                     // إضافة صفحة جديدة

       HPDF.CurrentPage.Size := Tabloid;                  // حجم صفحة Tabloid بمقاس 11 × 17 بوصة

       HPDF.CurrentPage.TextOut(10, 10, 0, 'Tabloid Size'); // طباعة النص

       HPDF.AddPage;                                                     // إضافة صفحة جديدة

       HPDF.CurrentPage.Size := Ledger;                   // حجم صفحة Ledger بمقاس 17 × 11 بوصة

       HPDF.CurrentPage.TextOut(10, 10, 0, 'Ledger Size'); // طباعة النص

       HPDF.EndDoc;                                                       // إغلاق ملف PDF

   finally

       HPDF.Free;

   end;

end.