test/HTML/tabla_estilos.php

   1 <?
   2
   3 require_once '../../lib/MECON/HTML/Tabla.php';
   4 $tablas = array();
   5 $estilos = array();
   6 $dir = dir('../../lib/MECON/HTML/Tabla');
   7 while (($f = $dir->read()) !== false) {
   8         if (preg_match('/^estilo_(.*)\.php$/', $f, $m)) {
   9                 $tablas[] = new MECON_HTML_Tabla(array(), $m[1]);
  10                 $estilos[] = $m[1];
  11         }
  12 }
  13
  14 ?>
  15 <html>
  16 <head>
  17 <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
  18 <title>
  19 Prueba de Tabla.
  20 </title>
  21 <? for ($i = 0; $i < count($tablas); $i++) echo '<link rel="StyleSheet" href="' . str_replace('/MECON/css/html/tabla/', '/~llucar/meconlib/www/css/html/tabla/', $tablas[$i]->getCSS()) . '"/>' ?>
  22 </head>
  23 <body bgcolor="#FFFFFF" color="#000000" align="center">
  24 <table width="760" align="center">
  25 <tr>
  26 <td>
  27 <?php
  28
  29 for ($i = 0; $i < count($tablas); $i++) {
  30
  31     echo '<h3>' . $estilos[$i] . '</h3>';
  32
  33     $row =  array ('R0C0','R1C1','R1C2','R2C3','R2C4','R2C5','R2C6','R2C7','R2C8','R2C9');
  34     $tablas[$i]->addRow($row,'cabecera colspan=10');
  35     $row =  array ('R1C0','R1C1','R1C2','R2C3','R2C4','R2C5','R2C6','R2C7','R2C8','R2C9');
  36     $tablas[$i]->addRow($row);
  37     $row =  array ('R2C0','R2C1','R2C2','R2C3','R2C4','R2C5','R2C6','R2C7','R2C8','R2C9');
  38     $tablas[$i]->addRow($row);
  39     $row =  array ('R3C0','R3C1','R3C2','R3C3','R3C4','R3C5','R3C6','R3C7','R3C8','R3C9');
  40     $tablas[$i]->addRow($row);
  41
  42     $tablas[$i]->updateCellAttributes(1, 0, 'rowspan=3');
  43     $tablas[$i]->updateCellAttributes(1, 1, 'rowspan=3');
  44     $tablas[$i]->updateCellAttributes(1, 2, 'colspan=8');
  45     $tablas[$i]->updateCellAttributes(2, 2, 'colspan=2');
  46     $tablas[$i]->updateCellAttributes(2, 4, 'colspan=2');
  47     $tablas[$i]->updateCellAttributes(2, 6, array ('colspan'=>2));
  48     $tablas[$i]->updateCellAttributes(2, 8, 'colspan=2');
  49     $tablas[$i]->updateColAttributes(2, 'titulo');
  50
  51     echo $tablas[$i]->toHtml() . '<br>';
  52 }
  53
  54 ?>
  55 </td>
  56 </tr>
  57 </table>
  58 </body>
  59 </html>
  60
  61