Blame | Last modification | View Log | RSS feed
<?php//============================================================+// File name : example_013.php// Begin : 2008-03-04// Last Update : 2010-08-08//// Description : Example 013 for TCPDF class// Graphic Transformations//// 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: Graphic Transformations* @author Nicola Asuni* @copyright 2004-2009 Nicola Asuni - Tecnick.com S.r.l (www.tecnick.com) Via Della Pace, 11 - 09044 - Quartucciu (CA) - ITALY - www.tecnick.com - info@tecnick.com* @link http://tcpdf.org* @license http://www.gnu.org/copyleft/lesser.html LGPL* @since 2008-03-04*/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 013');$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.' 013', 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, 'Graphic Transformations', '', 0, 'C', 1, 0, false, false, 0);// set font$pdf->SetFont('helvetica', '', 10);// --- Scaling ---------------------------------------------$pdf->SetDrawColor(200);$pdf->SetTextColor(200);$pdf->Rect(50, 70, 40, 10, 'D');$pdf->Text(50, 66, 'Scale');$pdf->SetDrawColor(0);$pdf->SetTextColor(0);// Start Transformation$pdf->StartTransform();// Scale by 150% centered by (50,80) which is the lower left corner of the rectangle$pdf->ScaleXY(150, 50, 80);$pdf->Rect(50, 70, 40, 10, 'D');$pdf->Text(50, 66, 'Scale');// Stop Transformation$pdf->StopTransform();// --- Translation -----------------------------------------$pdf->SetDrawColor(200);$pdf->SetTextColor(200);$pdf->Rect(125, 70, 40, 10, 'D');$pdf->Text(125, 66, 'Translate');$pdf->SetDrawColor(0);$pdf->SetTextColor(0);// Start Transformation$pdf->StartTransform();// Translate 7 to the right, 5 to the bottom$pdf->Translate(7, 5);$pdf->Rect(125, 70, 40, 10, 'D');$pdf->Text(125, 66, 'Translate');// Stop Transformation$pdf->StopTransform();// --- Rotation --------------------------------------------$pdf->SetDrawColor(200);$pdf->SetTextColor(200);$pdf->Rect(70, 100, 40, 10, 'D');$pdf->Text(70, 96, 'Rotate');$pdf->SetDrawColor(0);$pdf->SetTextColor(0);// Start Transformation$pdf->StartTransform();// Rotate 20 degrees counter-clockwise centered by (70,110) which is the lower left corner of the rectangle$pdf->Rotate(20, 70, 110);$pdf->Rect(70, 100, 40, 10, 'D');$pdf->Text(70, 96, 'Rotate');// Stop Transformation$pdf->StopTransform();// --- Skewing ---------------------------------------------$pdf->SetDrawColor(200);$pdf->SetTextColor(200);$pdf->Rect(125, 100, 40, 10, 'D');$pdf->Text(125, 96, 'Skew');$pdf->SetDrawColor(0);$pdf->SetTextColor(0);// Start Transformation$pdf->StartTransform();// skew 30 degrees along the x-axis centered by (125,110) which is the lower left corner of the rectangle$pdf->SkewX(30, 125, 110);$pdf->Rect(125, 100, 40, 10, 'D');$pdf->Text(125, 96, 'Skew');// Stop Transformation$pdf->StopTransform();// --- Mirroring horizontally ------------------------------$pdf->SetDrawColor(200);$pdf->SetTextColor(200);$pdf->Rect(70, 130, 40, 10, 'D');$pdf->Text(70, 126, 'MirrorH');$pdf->SetDrawColor(0);$pdf->SetTextColor(0);// Start Transformation$pdf->StartTransform();// mirror horizontally with axis of reflection at x-position 70 (left side of the rectangle)$pdf->MirrorH(70);$pdf->Rect(70, 130, 40, 10, 'D');$pdf->Text(70, 126, 'MirrorH');// Stop Transformation$pdf->StopTransform();// --- Mirroring vertically --------------------------------$pdf->SetDrawColor(200);$pdf->SetTextColor(200);$pdf->Rect(125, 130, 40, 10, 'D');$pdf->Text(125, 126, 'MirrorV');$pdf->SetDrawColor(0);$pdf->SetTextColor(0);// Start Transformation$pdf->StartTransform();// mirror vertically with axis of reflection at y-position 140 (bottom side of the rectangle)$pdf->MirrorV(140);$pdf->Rect(125, 130, 40, 10, 'D');$pdf->Text(125, 126, 'MirrorV');// Stop Transformation$pdf->StopTransform();// --- Point reflection ------------------------------------$pdf->SetDrawColor(200);$pdf->SetTextColor(200);$pdf->Rect(70, 160, 40, 10, 'D');$pdf->Text(70, 156, 'MirrorP');$pdf->SetDrawColor(0);$pdf->SetTextColor(0);// Start Transformation$pdf->StartTransform();// point reflection at the lower left point of rectangle$pdf->MirrorP(70,170);$pdf->Rect(70, 160, 40, 10, 'D');$pdf->Text(70, 156, 'MirrorP');// Stop Transformation$pdf->StopTransform();// --- Mirroring against a straigth line described by a point (120, 120) and an angle -20°$angle=-20;$px=120;$py=170;// just for visualisation: the straight line to mirror against$pdf->SetDrawColor(200);$pdf->Line($px-1,$py-1,$px+1,$py+1);$pdf->Line($px-1,$py+1,$px+1,$py-1);$pdf->StartTransform();$pdf->Rotate($angle, $px, $py);$pdf->Line($px-5, $py, $px+60, $py);$pdf->StopTransform();$pdf->SetDrawColor(200);$pdf->SetTextColor(200);$pdf->Rect(125, 160, 40, 10, 'D');$pdf->Text(125, 156, 'MirrorL');$pdf->SetDrawColor(0);$pdf->SetTextColor(0);//Start Transformation$pdf->StartTransform();//mirror against the straight line$pdf->MirrorL($angle, $px, $py);$pdf->Rect(125, 160, 40, 10, 'D');$pdf->Text(125, 156, 'MirrorL');//Stop Transformation$pdf->StopTransform();// ---------------------------------------------------------//Close and output PDF document$pdf->Output('example_013.pdf', 'I');//============================================================+// END OF FILE//============================================================+