source: sipes/libraries/tcpdf/examples/example_049.php @ b354002

stableversion-3.0
Last change on this file since b354002 was 307d09d, checked in by José Gregorio Puentes <jpuentes@…>, 8 años ago

se agregaron las librerias

  • Propiedad mode establecida a 100755
File size: 4.4 KB
Línea 
1<?php
2//============================================================+
3// File name   : example_049.php
4// Begin       : 2009-04-03
5// Last Update : 2010-08-08
6//
7// Description : Example 049 for TCPDF class
8//               WriteHTML with TCPDF callback functions
9//
10// Author: Nicola Asuni
11//
12// (c) Copyright:
13//               Nicola Asuni
14//               Tecnick.com s.r.l.
15//               Via Della Pace, 11
16//               09044 Quartucciu (CA)
17//               ITALY
18//               www.tecnick.com
19//               info@tecnick.com
20//============================================================+
21
22/**
23 * Creates an example PDF TEST document using TCPDF
24 * @package com.tecnick.tcpdf
25 * @abstract TCPDF - Example: WriteHTML with TCPDF callback functions
26 * @author Nicola Asuni
27 * @since 2008-03-04
28 */
29
30require_once('../config/lang/eng.php');
31require_once('../tcpdf.php');
32
33// create new PDF document
34$pdf = new TCPDF(PDF_PAGE_ORIENTATION, PDF_UNIT, PDF_PAGE_FORMAT, true, 'UTF-8', false);
35
36// set document information
37$pdf->SetCreator(PDF_CREATOR);
38$pdf->SetAuthor('Nicola Asuni');
39$pdf->SetTitle('TCPDF Example 049');
40$pdf->SetSubject('TCPDF Tutorial');
41$pdf->SetKeywords('TCPDF, PDF, example, test, guide');
42
43// set default header data
44$pdf->SetHeaderData(PDF_HEADER_LOGO, PDF_HEADER_LOGO_WIDTH, PDF_HEADER_TITLE.' 049', PDF_HEADER_STRING);
45
46// set header and footer fonts
47$pdf->setHeaderFont(Array(PDF_FONT_NAME_MAIN, '', PDF_FONT_SIZE_MAIN));
48$pdf->setFooterFont(Array(PDF_FONT_NAME_DATA, '', PDF_FONT_SIZE_DATA));
49
50// set default monospaced font
51$pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);
52
53//set margins
54$pdf->SetMargins(PDF_MARGIN_LEFT, PDF_MARGIN_TOP, PDF_MARGIN_RIGHT);
55$pdf->SetHeaderMargin(PDF_MARGIN_HEADER);
56$pdf->SetFooterMargin(PDF_MARGIN_FOOTER);
57
58//set auto page breaks
59$pdf->SetAutoPageBreak(TRUE, PDF_MARGIN_BOTTOM);
60
61//set image scale factor
62$pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);
63
64//set some language-dependent strings
65$pdf->setLanguageArray($l);
66
67// ---------------------------------------------------------
68
69// set font
70$pdf->SetFont('helvetica', '', 10);
71
72// add a page
73$pdf->AddPage();
74
75
76/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
77
78IMPORTANT:
79If you are printing user-generated content, tcpdf tag can be unsafe.
80You can disable this tag by setting to false the K_TCPDF_CALLS_IN_HTML
81constant on TCPDF configuration file.
82
83For security reasons, the parameters for the 'params' attribute of TCPDF
84tag must be prepared as an array and encoded with the
85serializeTCPDFtagParameters() method (see the example below).
86
87 * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
88
89
90$html = '<h1>Test TCPDF Methods in HTML</h1>
91<h2 style="color:red;">IMPORTANT:</h2>
92<span style="color:red;">If you are printing user-generated content, tcpdf tag can be unsafe.<br />
93You can disable this tag by setting to false the <b>K_TCPDF_CALLS_IN_HTML</b> constant on TCPDF configuration file.</span>
94<h2>write1DBarcode method in HTML</h2>';
95
96$params = $pdf->serializeTCPDFtagParameters(array('CODE 39', 'C39', '', '', 80, 30, 0.4, array('position'=>'S', 'border'=>true, 'padding'=>4, 'fgcolor'=>array(0,0,0), 'bgcolor'=>array(255,255,255), 'text'=>true, 'font'=>'helvetica', 'fontsize'=>8, 'stretchtext'=>4), 'N'));
97$html .= '<tcpdf method="write1DBarcode" params="'.$params.'" />';
98
99$params = $pdf->serializeTCPDFtagParameters(array('CODE 128C+', 'C128C', '', '', 80, 30, 0.4, array('position'=>'S', 'border'=>true, 'padding'=>4, 'fgcolor'=>array(0,0,0), 'bgcolor'=>array(255,255,255), 'text'=>true, 'font'=>'helvetica', 'fontsize'=>8, 'stretchtext'=>4), 'N'));
100$html .= '<tcpdf method="write1DBarcode" params="'.$params.'" />';
101
102$html .= '<tcpdf method="AddPage" /><h2>Graphic Functions</h2>';
103
104$params = $pdf->serializeTCPDFtagParameters(array(0));
105$html .= '<tcpdf method="SetDrawColor" params="'.$params.'" />';
106
107$params = $pdf->serializeTCPDFtagParameters(array(50, 50, 40, 10, 'DF', array(), array(0,128,255)));
108$html .= '<tcpdf method="Rect" params="'.$params.'" />';
109
110
111// output the HTML content
112$pdf->writeHTML($html, true, 0, true, 0);
113
114// - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
115
116// reset pointer to the last page
117$pdf->lastPage();
118
119// ---------------------------------------------------------
120
121//Close and output PDF document
122$pdf->Output('example_049.pdf', 'I');
123
124//============================================================+
125// END OF FILE
126//============================================================+
Nota: Vea TracBrowser para ayuda de uso del navegador del repositorio.