source: trunk/client/inc/hpdf5/tecnickcom/tcpdf/examples/example_035.php@ 418

Last change on this file since 418 was 347, checked in by roby, 4 years ago

Aggiornamento per compatibilità con php7.4

File size: 3.4 KB
Line 
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
11//
12// (c) Copyright:
13// Nicola Asuni
14// Tecnick.com LTD
15// www.tecnick.com
16// info@tecnick.com
17//============================================================+
18
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
25 */
26
27// Include the main TCPDF library (search for installation path).
28require_once('tcpdf_include.php');
29
30// create new PDF document
31$pdf = new TCPDF(PDF_PAGE_ORIENTATION, PDF_UNIT, PDF_PAGE_FORMAT, true, 'UTF-8', false);
32
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');
39
40// set default header data
41$pdf->SetHeaderData(PDF_HEADER_LOGO, PDF_HEADER_LOGO_WIDTH, PDF_HEADER_TITLE.' 035', PDF_HEADER_STRING);
42
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));
46
47// set default monospaced font
48$pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);
49
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);
54
55// set auto page breaks
56$pdf->SetAutoPageBreak(TRUE, PDF_MARGIN_BOTTOM);
57
58// set image scale factor
59$pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);
60
61// set some language-dependent strings (optional)
62if (@file_exists(dirname(__FILE__).'/lang/eng.php')) {
63 require_once(dirname(__FILE__).'/lang/eng.php');
64 $pdf->setLanguageArray($l);
65}
66
67// ---------------------------------------------------------
68
69// set font
70$pdf->SetFont('times', 'BI', 16);
71
72// add a page
73$pdf->AddPage();
74
75$pdf->Write(0, 'Example of SetLineStyle() method', '', 0, 'L', true, 0, false, false, 0);
76
77$pdf->Ln();
78
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);
82
83$text="DUMMY";
84
85$pdf->Cell(0, 0, $text, 1, 1, 'L', 1, 0);
86
87$pdf->Ln();
88
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);
93
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);
98
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);
103
104// ---------------------------------------------------------
105
106//Close and output PDF document
107$pdf->Output('example_035.pdf', 'I');
108
109//============================================================+
110// END OF FILE
111//============================================================+
Note: See TracBrowser for help on using the repository browser.