couple very minor fixes to prior commit
[openemr.git] / library / html2pdf / vendor / tecnickcom / tcpdf / examples / example_035.php
blob0e5280c2724692c2490c4fe56db05bc368436a8a
1 <?php
2 //============================================================+
3 // File name : example_035.php
4 // Begin : 2008-07-22
5 // Last Update : 2013-05-14
6 //
7 // Description : Example 035 for TCPDF class
8 // Line styles with cells and multicells
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: Line styles with cells and multicells
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 035');
37 $pdf->SetSubject('TCPDF Tutorial');
38 $pdf->SetKeywords('TCPDF, PDF, example, test, guide');
40 // set default header data
41 $pdf->SetHeaderData(PDF_HEADER_LOGO, PDF_HEADER_LOGO_WIDTH, PDF_HEADER_TITLE.' 035', PDF_HEADER_STRING);
43 // set header and footer fonts
44 $pdf->setHeaderFont(Array(PDF_FONT_NAME_MAIN, '', PDF_FONT_SIZE_MAIN));
45 $pdf->setFooterFont(Array(PDF_FONT_NAME_DATA, '', PDF_FONT_SIZE_DATA));
47 // set default monospaced font
48 $pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);
50 // set margins
51 $pdf->SetMargins(PDF_MARGIN_LEFT, PDF_MARGIN_TOP, PDF_MARGIN_RIGHT);
52 $pdf->SetHeaderMargin(PDF_MARGIN_HEADER);
53 $pdf->SetFooterMargin(PDF_MARGIN_FOOTER);
55 // set auto page breaks
56 $pdf->SetAutoPageBreak(TRUE, PDF_MARGIN_BOTTOM);
58 // set image scale factor
59 $pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);
61 // set some language-dependent strings (optional)
62 if (@file_exists(dirname(__FILE__).'/lang/eng.php')) {
63 require_once(dirname(__FILE__).'/lang/eng.php');
64 $pdf->setLanguageArray($l);
67 // ---------------------------------------------------------
69 // set font
70 $pdf->SetFont('times', 'BI', 16);
72 // add a page
73 $pdf->AddPage();
75 $pdf->Write(0, 'Example of SetLineStyle() method', '', 0, 'L', true, 0, false, false, 0);
77 $pdf->Ln();
79 $pdf->SetLineStyle(array('width' => 0.5, 'cap' => 'butt', 'join' => 'miter', 'dash' => 4, 'color' => array(255, 0, 0)));
80 $pdf->SetFillColor(255,255,128);
81 $pdf->SetTextColor(0,0,128);
83 $text="DUMMY";
85 $pdf->Cell(0, 0, $text, 1, 1, 'L', 1, 0);
87 $pdf->Ln();
89 $pdf->SetLineStyle(array('width' => 0.5, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 255)));
90 $pdf->SetFillColor(255,255,0);
91 $pdf->SetTextColor(0,0,255);
92 $pdf->MultiCell(60, 4, $text, 1, 'C', 1, 0);
94 $pdf->SetLineStyle(array('width' => 0.5, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(255, 255, 0)));
95 $pdf->SetFillColor(0,0,255);
96 $pdf->SetTextColor(255,255,0);
97 $pdf->MultiCell(60, 4, $text, 'TB', 'C', 1, 0);
99 $pdf->SetLineStyle(array('width' => 0.5, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(255, 0, 255)));
100 $pdf->SetFillColor(0,255,0);
101 $pdf->SetTextColor(255,0,255);
102 $pdf->MultiCell(60, 4, $text, 1, 'C', 1, 1);
104 // ---------------------------------------------------------
106 //Close and output PDF document
107 $pdf->Output('example_035.pdf', 'I');
109 //============================================================+
110 // END OF FILE
111 //============================================================+