Blame view

sources/3rdparty/phpdocx/pdf/tcpdf/examples/example_031.php 2.78 KB
31b7f2792   Kload   Upgrade to ownclo...
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
  <?php
  //============================================================+
  // File name   : example_031.php
  // Begin       : 2008-06-09
  // Last Update : 2010-08-08
  //
  // Description : Example 031 for TCPDF class
  //               Pie Chart
  //
  // Author: Nicola Asuni
  //
  // (c) Copyright:
  //               Nicola Asuni
  //               Tecnick.com s.r.l.
  //               Via Della Pace, 11
  //               09044 Quartucciu (CA)
  //               ITALY
  //               www.tecnick.com
  //               info@tecnick.com
  //============================================================+
  
  /**
   * Creates an example PDF TEST document using TCPDF
   * @package com.tecnick.tcpdf
   * @abstract TCPDF - Example: Pie Chart
   * @author Nicola Asuni
   * @since 2008-06-09
   */
  
  require_once('../config/lang/eng.php');
  require_once('../tcpdf.php');
  
  // create new PDF document
  $pdf = new TCPDF(PDF_PAGE_ORIENTATION, PDF_UNIT, PDF_PAGE_FORMAT, true, 'UTF-8', false);
  
  // set document information
  $pdf->SetCreator(PDF_CREATOR);
  $pdf->SetAuthor('Nicola Asuni');
  $pdf->SetTitle('TCPDF Example 031');
  $pdf->SetSubject('TCPDF Tutorial');
  $pdf->SetKeywords('TCPDF, PDF, example, test, guide');
  
  // set default header data
  $pdf->SetHeaderData(PDF_HEADER_LOGO, PDF_HEADER_LOGO_WIDTH, PDF_HEADER_TITLE.' 031', PDF_HEADER_STRING);
  
  // set header and footer fonts
  $pdf->setHeaderFont(Array(PDF_FONT_NAME_MAIN, '', PDF_FONT_SIZE_MAIN));
  $pdf->setFooterFont(Array(PDF_FONT_NAME_DATA, '', PDF_FONT_SIZE_DATA));
  
  // set default monospaced font
  $pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);
  
  //set margins
  $pdf->SetMargins(PDF_MARGIN_LEFT, PDF_MARGIN_TOP, PDF_MARGIN_RIGHT);
  $pdf->SetHeaderMargin(PDF_MARGIN_HEADER);
  $pdf->SetFooterMargin(PDF_MARGIN_FOOTER);
  
  //set auto page breaks
  $pdf->SetAutoPageBreak(TRUE, PDF_MARGIN_BOTTOM);
  
  //set image scale factor
  $pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);
  
  //set some language-dependent strings
  $pdf->setLanguageArray($l);
  
  // ---------------------------------------------------------
  
  // set font
  $pdf->SetFont('helvetica', 'B', 20);
  
  // add a page
  $pdf->AddPage();
  
  $pdf->Write(0, 'Example of PieSector() method.');
  
  $xc = 105;
  $yc = 100;
  $r = 50;
  
  $pdf->SetFillColor(0, 0, 255);
  $pdf->PieSector($xc, $yc, $r, 20, 120, 'FD', false, 0, 2);
  
  $pdf->SetFillColor(0, 255, 0);
  $pdf->PieSector($xc, $yc, $r, 120, 250, 'FD', false, 0, 2);
  
  $pdf->SetFillColor(255, 0, 0);
  $pdf->PieSector($xc, $yc, $r, 250, 20, 'FD', false, 0, 2);
  
  // write labels
  $pdf->SetTextColor(255,255,255);
  $pdf->Text(105, 65, 'BLUE');
  $pdf->Text(60, 95, 'GREEN');
  $pdf->Text(120, 115, 'RED');
  
  // ---------------------------------------------------------
  
  //Close and output PDF document
  $pdf->Output('example_031.pdf', 'I');
  
  //============================================================+
  // END OF FILE
  //============================================================+