Sigo buscando el bug

[mecon/meconlib.git] / test / PDF / test.php

diff --git a/test/PDF/test.php b/test/PDF/test.php
index 2c0d365ee6d03c1369a2a6176d7d71004be816f5..05267513439fa8f8d56b84fc0e1c56fc5af805b1 100755 (executable)
--- a/test/PDF/test.php
+++ b/test/PDF/test.php
@@ -6,6 +6,8 @@ prepend_include_path('/home/mmarrese/public_html/meconlib/lib/');
 require_once 'MECON/HTML/Tabla.php';
 require_once 'MECON/PDF/Marco.php';
 require_once 'MECON/PDF/Tabla.php';
 require_once 'MECON/HTML/Tabla.php';
 require_once 'MECON/PDF/Marco.php';
 require_once 'MECON/PDF/Tabla.php';

+require_once 'MECON/PDF/Texto.php';
+require_once 'MECON/PDF/SaltoPagina.php';

 
 $TABLA =& new MECON_HTML_Tabla();
 
 
 $TABLA =& new MECON_HTML_Tabla();
 


@@ -13,7 +15,7 @@ $TABLA->addRow(array ('1erCabecera', '2daCabecera para que la corete',
             '3erCabecera'), 'cabecera');
 $TABLA->addRow(array ('1erColumna', '2daColumna para que la corete',
             '3erColumna'), 'clara');
             '3erCabecera'), 'cabecera');
 $TABLA->addRow(array ('1erColumna', '2daColumna para que la corete',
             '3erColumna'), 'clara');

-for ($i=0; $i<60; $i++) {
+for ($i=0; $i<20; $i++) {

     if ($i == 50) {
         $TABLA->addRow(array ('1erColumna para gonzalo que lo mira por tv desde su casa en ayacucho 1593. Aunque ahora que lo pienso me estoy equivocando', '2daColumna 1erColumna para gonzalo que lo mira por tv desde su casa en ayacucho 1593. Aunque ahora que lo pienso me estoy equivocando FILA 50', '3erColumna1erColumna para gonzalo que lo mira por tv desde su casa en ayacucho 1593. Aunque ahora que lo pienso me estoy equivocando'), 'comun');
     }
     if ($i == 50) {
         $TABLA->addRow(array ('1erColumna para gonzalo que lo mira por tv desde su casa en ayacucho 1593. Aunque ahora que lo pienso me estoy equivocando', '2daColumna 1erColumna para gonzalo que lo mira por tv desde su casa en ayacucho 1593. Aunque ahora que lo pienso me estoy equivocando FILA 50', '3erColumna1erColumna para gonzalo que lo mira por tv desde su casa en ayacucho 1593. Aunque ahora que lo pienso me estoy equivocando'), 'comun');
     }


@@ -32,12 +34,44 @@ $TABLA->updateCellAttributes(2,0, 'align="left"');
 $TABLA->updateCellAttributes(2,1, 'align="center"');
 $TABLA->updateCellAttributes(2,2, 'align="right"');
 
 $TABLA->updateCellAttributes(2,1, 'align="center"');
 $TABLA->updateCellAttributes(2,2, 'align="right"');
 

+
+$PDF_TEXTO =& new MECON_PDF_Texto;
+
+$PDF_TEXTO->addContent(array (
+            "Texto a la izquierda",
+            "Texto al centro", "Texto a la derecha"));
+
+$PDF_TEXTO->setEstilo(0,  array ('font'   => 'Helvetica-Bold', 'height' => 8,
+            'align'  => 'left'));
+$PDF_TEXTO->setEstilo(1,  array ('font'   => 'Helvetica-Bold', 'height' => 8,
+            'align'  => 'center'));
+$PDF_TEXTO->setEstilo(2,  array ('font'   => 'Helvetica-Bold', 'height' => 8,
+            'align'  => 'right'));
+
+$PDF_TEXTO->addContent("PARRAFO 1 -> Si se omite tamano, se suprime todo desde el desplazamiento hasta el final de la matriz. Si se especifica el tamano y es positivo, se suprimirán tantos elementos como se especifica. Si fuera negativo, el final de la porción eliminada estará a tantos elementos del final de la matriz. Truco: para eliminar todo desde el desplazamiento hasta el final de la matriz cuando también se especifica sustitucion,utilice  como tamano.\nPARRAFO 2 ->Si se especifia la matriz de sustitucion, entonces los elementos suprimidos son reemplazados con los elementos de dicha matriz. Si los valores de desplazamiento y tamano son tales que nada es borrado, los elementos de la matriz sustitucion  se insertarán en la posición indicada por el desplazamiento. Truco: si sólo se va a sustituir algo por un elemento nada más, no hace falta poner alrededor del mismo, salvo que dicho elemento sea una matriz en sí mismo.");
+
+
+$PDF_TEXTO2 =& new MECON_PDF_Texto;
+$PDF_TEXTO2->addContent("El jefe de Gobierno porteño, Aníbal Ibarra, advirtió que su gestión no otorgará beneficios a los piqueteros que durante el fin de semana último ocuparon un predio en el barrio de Palermo.\n Si uno privilegia la situación de irregularidad, es que ponemos patas para arriba a toda la sociedad, enfatizó Ibarra, quien advirtió que no avalará situaciones de fuerza por sobre lo que hacen cientos de miles de ciudadanos que pagan sus créditos y que se anotan (en planes) para viviendas, esperando a veces durante muchos años.\n En declaraciones periodísticas, Ibarra remarcó que no se puede obtener una vivienda ni autorización para construir viviendas sobre la presión y mucho menos sobre una situación de ilegalidad.");
+$PDF_TEXTO2->setEstilo(1,  array ('font'   => 'Helvetica-Bold', 'height' => 8,
+            'align'  => 'center'));
+$PDF_TEXTO2->setEstilo(0,  array ('font'   => 'Helvetica-Bold', 'height' => 8,
+            'align'  => 'right'));
+
+//print '<PRE>MARTIN FIN </PRE>';
+

 $PDF_MARCO =& new MECON_PDF_Marco ('a4', 'portrait');
 $PDF_MARCO->seccion   = 'Prueba de la libreria de PDF\'s';
 $PDF_MARCO->titulo    = 'Alberto Giordano';
 $PDF_MARCO->subtitulo = 'Filosofo Estilista, guacho pulenta si los hay';
 
 $PDF_MARCO->addContent(new MECON_PDF_Tabla ($TABLA), false);
 $PDF_MARCO =& new MECON_PDF_Marco ('a4', 'portrait');
 $PDF_MARCO->seccion   = 'Prueba de la libreria de PDF\'s';
 $PDF_MARCO->titulo    = 'Alberto Giordano';
 $PDF_MARCO->subtitulo = 'Filosofo Estilista, guacho pulenta si los hay';
 
 $PDF_MARCO->addContent(new MECON_PDF_Tabla ($TABLA), false);

+//$PDF_MARCO->addContent($PDF_TEXTO, false);
+//$PDF_MARCO->addContent($PDF_TEXTO2, true);
+//$PDF_MARCO->addContent(new MECON_PDF_SaltoPagina(), false);
+//$PDF_MARCO->addContent($PDF_TEXTO2, true);
+//$PDF_MARCO->addContent($PDF_TEXTO2, true);
+//$PDF_MARCO->addContent(new MECON_PDF_Tabla ($TABLA), true);

 
 $PDF_MARCO->display();
 
 
 $PDF_MARCO->display();