<?php define('FPDF_FONTPATH','font/'); 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(); ?>
 |