<?php require('fpdf.php');
class PDF extends FPDF { var $B; var $I; var $U; var $HREF;
function PDF($orientation='P',$unit='mm',$format='A4') { //Llama al constructor de la clase padre $this->FPDF($orientation,$unit,$format); //Iniciación de variables $this->B=0; $this->I=0; $this->U=0; $this->HREF=''; }
function WriteHTML($html) { //Intérprete de HTML $html=str_replace("\n",' ',$html); $a=preg_split('/<(.*)>/U',$html,-1,PREG_SPLIT_DELIM_CAPTURE); foreach($a as $i=>$e) { if($i%2==0) { //Text if($this->HREF) $this->PutLink($this->HREF,$e); else $this->Write(5,$e); } else { //Etiqueta if($e{0}=='/') $this->CloseTag(strtoupper(substr($e,1))); else { //Extraer atributos $a2=explode(' ',$e); $tag=strtoupper(array_shift($a2)); $attr=array(); foreach($a2 as $v) if(ereg('^([^=]*)=["\']?([^"\']*)["\']?$',$v,$a3)) $attr[strtoupper($a3[1])]=$a3[2]; $this->OpenTag($tag,$attr); } } } }
function OpenTag($tag,$attr) { //Etiqueta de apertura if($tag=='B' or $tag=='I' or $tag=='U') $this->SetStyle($tag,true); if($tag=='A') $this->HREF=$attr['HREF']; if($tag=='BR') $this->Ln(5); }
function CloseTag($tag) { //Etiqueta de cierre if($tag=='B' or $tag=='I' or $tag=='U') $this->SetStyle($tag,false); if($tag=='A') $this->HREF=''; }
function SetStyle($tag,$enable) { //Modificar estilo y escoger la fuente correspondiente $this->$tag+=($enable ? 1 : -1); $style=''; foreach(array('B','I','U') as $s) if($this->$s>0) $style.=$s; $this->SetFont('',$style); }
function PutLink($URL,$txt) { //Escribir un hiper-enlace $this->SetTextColor(0,0,255); $this->SetStyle('U',true); $this->Write(5,$txt,$URL); $this->SetStyle('U',false); $this->SetTextColor(0); } }
$html='Ahora puede imprimir fácilmente texto mezclando diferentes estilos: <B>negrita</B>, <I>itálica</I>, <U>subrayado</U>, o ¡ <B><I><U>todos a la vez</U></I></B>!<BR> También puede incluir enlaces en el texto, como <A HREF="http://www.fpdf.org">www.fpdf.org</A>, o en una imagen: pulse en el logotipo.';
$pdf=new PDF(); //Primera página $pdf->AddPage(); $pdf->SetFont('Arial','',20); $pdf->Write(5,'Para saber qué hay de nuevo en este tutorial, pulse '); $pdf->SetFont('','U'); $link=$pdf->AddLink(); $pdf->Write(5,'aquí',$link); $pdf->SetFont(''); //Segunda página $pdf->AddPage(); $pdf->SetLink($link); $pdf->Image('logo.png',10,10,30,0,'','http://www.fpdf.org'); $pdf->SetLeftMargin(45); $pdf->SetFontSize(14); $pdf->WriteHTML($html); $pdf->Output(); ?>
|