couple very minor fixes to prior commit
[openemr.git] / library / html2pdf / vendor / tecnickcom / tcpdf / examples / example_028.php
blobf250ac58970ab5bb3a84ce06320a59a634c56f6a
1 <?php
2 //============================================================+
3 // File name : example_028.php
4 // Begin : 2008-03-04
5 // Last Update : 2013-05-14
6 //
7 // Description : Example 028 for TCPDF class
8 // Changing page formats
9 //
10 // Author: Nicola Asuni
12 // (c) Copyright:
13 // Nicola Asuni
14 // Tecnick.com LTD
15 // www.tecnick.com
16 // info@tecnick.com
17 //============================================================+
19 /**
20 * Creates an example PDF TEST document using TCPDF
21 * @package com.tecnick.tcpdf
22 * @abstract TCPDF - Example: changing page formats
23 * @author Nicola Asuni
24 * @since 2008-03-04
27 // Include the main TCPDF library (search for installation path).
28 require_once('tcpdf_include.php');
30 // create new PDF document
31 $pdf = new TCPDF(PDF_PAGE_ORIENTATION, PDF_UNIT, PDF_PAGE_FORMAT, true, 'UTF-8', false);
33 // set document information
34 $pdf->SetCreator(PDF_CREATOR);
35 $pdf->SetAuthor('Nicola Asuni');
36 $pdf->SetTitle('TCPDF Example 028');
37 $pdf->SetSubject('TCPDF Tutorial');
38 $pdf->SetKeywords('TCPDF, PDF, example, test, guide');
40 // remove default header/footer
41 $pdf->setPrintHeader(false);
42 $pdf->setPrintFooter(false);
44 // set default monospaced font
45 $pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);
47 // set margins
48 $pdf->SetMargins(10, PDF_MARGIN_TOP, 10);
50 // set auto page breaks
51 $pdf->SetAutoPageBreak(TRUE, PDF_MARGIN_BOTTOM);
53 // set image scale factor
54 $pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);
56 // set some language-dependent strings (optional)
57 if (@file_exists(dirname(__FILE__).'/lang/eng.php')) {
58 require_once(dirname(__FILE__).'/lang/eng.php');
59 $pdf->setLanguageArray($l);
62 // ---------------------------------------------------------
64 $pdf->SetDisplayMode('fullpage', 'SinglePage', 'UseNone');
66 // set font
67 $pdf->SetFont('times', 'B', 20);
69 $pdf->AddPage('P', 'A4');
70 $pdf->Cell(0, 0, 'A4 PORTRAIT', 1, 1, 'C');
72 $pdf->AddPage('L', 'A4');
73 $pdf->Cell(0, 0, 'A4 LANDSCAPE', 1, 1, 'C');
75 $pdf->AddPage('P', 'A5');
76 $pdf->Cell(0, 0, 'A5 PORTRAIT', 1, 1, 'C');
78 $pdf->AddPage('L', 'A5');
79 $pdf->Cell(0, 0, 'A5 LANDSCAPE', 1, 1, 'C');
81 $pdf->AddPage('P', 'A6');
82 $pdf->Cell(0, 0, 'A6 PORTRAIT', 1, 1, 'C');
84 $pdf->AddPage('L', 'A6');
85 $pdf->Cell(0, 0, 'A6 LANDSCAPE', 1, 1, 'C');
87 $pdf->AddPage('P', 'A7');
88 $pdf->Cell(0, 0, 'A7 PORTRAIT', 1, 1, 'C');
90 $pdf->AddPage('L', 'A7');
91 $pdf->Cell(0, 0, 'A7 LANDSCAPE', 1, 1, 'C');
94 // --- test backward editing ---
97 $pdf->setPage(1, true);
98 $pdf->SetY(50);
99 $pdf->Cell(0, 0, 'A4 test', 1, 1, 'C');
101 $pdf->setPage(2, true);
102 $pdf->SetY(50);
103 $pdf->Cell(0, 0, 'A4 test', 1, 1, 'C');
105 $pdf->setPage(3, true);
106 $pdf->SetY(50);
107 $pdf->Cell(0, 0, 'A5 test', 1, 1, 'C');
109 $pdf->setPage(4, true);
110 $pdf->SetY(50);
111 $pdf->Cell(0, 0, 'A5 test', 1, 1, 'C');
113 $pdf->setPage(5, true);
114 $pdf->SetY(50);
115 $pdf->Cell(0, 0, 'A6 test', 1, 1, 'C');
117 $pdf->setPage(6, true);
118 $pdf->SetY(50);
119 $pdf->Cell(0, 0, 'A6 test', 1, 1, 'C');
121 $pdf->setPage(7, true);
122 $pdf->SetY(40);
123 $pdf->Cell(0, 0, 'A7 test', 1, 1, 'C');
125 $pdf->setPage(8, true);
126 $pdf->SetY(40);
127 $pdf->Cell(0, 0, 'A7 test', 1, 1, 'C');
129 $pdf->lastPage();
131 // ---------------------------------------------------------
133 //Close and output PDF document
134 $pdf->Output('example_028.pdf', 'I');
136 //============================================================+
137 // END OF FILE
138 //============================================================+