1<?php 2//============================================================+ 3// File name : example_031.php 4// Begin : 2008-06-09 5// Last Update : 2013-05-14 6// 7// Description : Example 031 for TCPDF class 8// Pie Chart 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: Pie Chart 23 * @author Nicola Asuni 24 * @since 2008-06-09 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 031'); 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.' 031', 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', 'B', 20); 71 72// add a page 73$pdf->AddPage(); 74 75$pdf->Write(0, 'Example of PieSector() method.'); 76 77$xc = 105; 78$yc = 100; 79$r = 50; 80 81$pdf->SetFillColor(0, 0, 255); 82$pdf->PieSector($xc, $yc, $r, 20, 120, 'FD', false, 0, 2); 83 84$pdf->SetFillColor(0, 255, 0); 85$pdf->PieSector($xc, $yc, $r, 120, 250, 'FD', false, 0, 2); 86 87$pdf->SetFillColor(255, 0, 0); 88$pdf->PieSector($xc, $yc, $r, 250, 20, 'FD', false, 0, 2); 89 90// write labels 91$pdf->SetTextColor(255,255,255); 92$pdf->Text(105, 65, 'BLUE'); 93$pdf->Text(60, 95, 'GREEN'); 94$pdf->Text(120, 115, 'RED'); 95 96// --------------------------------------------------------- 97 98//Close and output PDF document 99$pdf->Output('example_031.pdf', 'I'); 100 101//============================================================+ 102// END OF FILE 103//============================================================+ 104