source: trunk/client/inc/hpdf5/tecnickcom/tcpdf/examples/example_025.php@ 394

Last change on this file since 394 was 347, checked in by roby, 3 years ago

Aggiornamento per compatibilità con php7.4

File size: 3.3 KB
Line 
1<?php
2//============================================================+
3// File name : example_025.php
4// Begin : 2008-03-04
5// Last Update : 2013-05-14
6//
7// Description : Example 025 for TCPDF class
8// Object Transparency
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: Object Transparency
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 025');
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.' 025', 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('helvetica', '', 12);
71
72// add a page
73$pdf->AddPage();
74
75$txt = 'You can set the transparency of PDF objects using the setAlpha() method.';
76$pdf->Write(0, $txt, '', 0, '', true, 0, false, false, 0);
77
78/*
79 * setAlpha() gives transparency support. You can set the
80 * alpha channel from 0 (fully transparent) to 1 (fully
81 * opaque). It applies to all elements (text, drawings,
82 * images).
83 */
84
85$pdf->SetLineWidth(2);
86
87// draw opaque red square
88$pdf->SetFillColor(255, 0, 0);
89$pdf->SetDrawColor(127, 0, 0);
90$pdf->Rect(30, 40, 60, 60, 'DF');
91
92// set alpha to semi-transparency
93$pdf->SetAlpha(0.5);
94
95// draw green square
96$pdf->SetFillColor(0, 255, 0);
97$pdf->SetDrawColor(0, 127, 0);
98$pdf->Rect(50, 60, 60, 60, 'DF');
99
100// draw blue square
101$pdf->SetFillColor(0, 0, 255);
102$pdf->SetDrawColor(0, 0, 127);
103$pdf->Rect(70, 80, 60, 60, 'DF');
104
105// draw jpeg image
106$pdf->Image('images/image_demo.jpg', 90, 100, 60, 60, '', 'http://www.tcpdf.org', '', true, 72);
107
108// restore full opacity
109$pdf->SetAlpha(1);
110
111// ---------------------------------------------------------
112
113//Close and output PDF document
114$pdf->Output('example_025.pdf', 'I');
115
116//============================================================+
117// END OF FILE
118//============================================================+
Note: See TracBrowser for help on using the repository browser.