+<?
+
+require_once '../../lib/MECON/HTML/Tabla.php';
+$tablas = array();
+$estilos = array();
+$dir = dir('../../lib/MECON/HTML/Tabla');
+while (($f = $dir->read()) !== false) {
+ if (preg_match('/^estilo_(.*)\.php$/', $f, $m)) {
+ $tablas[] = new MECON_HTML_Tabla(array(), $m[1]);
+ $estilos[] = $m[1];
+ }
+}
+
+?>
+<html>
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<title>
+Prueba de Tabla.
+</title>
+<? 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()) . '"/>' ?>
+</head>
+<body bgcolor="#FFFFFF" color="#000000" align="center">
+<table width="760" align="center">
+<tr>
+<td>
+<?php
+
+for ($i = 0; $i < count($tablas); $i++) {
+
+ echo '<h3>' . $estilos[$i] . '</h3>';
+
+ $row = array ('R0C0','R1C1','R1C2','R2C3','R2C4','R2C5','R2C6','R2C7','R2C8','R2C9');
+ $tablas[$i]->addRow($row,'cabecera colspan=10');
+ $row = array ('R1C0','R1C1','R1C2','R2C3','R2C4','R2C5','R2C6','R2C7','R2C8','R2C9');
+ $tablas[$i]->addRow($row);
+ $row = array ('R2C0','R2C1','R2C2','R2C3','R2C4','R2C5','R2C6','R2C7','R2C8','R2C9');
+ $tablas[$i]->addRow($row);
+ $row = array ('R3C0','R3C1','R3C2','R3C3','R3C4','R3C5','R3C6','R3C7','R3C8','R3C9');
+ $tablas[$i]->addRow($row);
+
+ $tablas[$i]->updateCellAttributes(1, 0, 'rowspan=3');
+ $tablas[$i]->updateCellAttributes(1, 1, 'rowspan=3');
+ $tablas[$i]->updateCellAttributes(1, 2, 'colspan=8');
+ $tablas[$i]->updateCellAttributes(2, 2, 'colspan=2');
+ $tablas[$i]->updateCellAttributes(2, 4, 'colspan=2');
+ $tablas[$i]->updateCellAttributes(2, 6, array ('colspan'=>2));
+ $tablas[$i]->updateCellAttributes(2, 8, 'colspan=2');
+ $tablas[$i]->updateColAttributes(2, 'titulo');
+
+ echo $tablas[$i]->toHtml() . '<br>';
+}
+
+?>
+</td>
+</tr>
+</table>
+</body>
+</html>
+
+