]> git.llucax.com Git - mecon/samurai.git/blobdiff - sistema/www/sel-sistema.php
Acomodo para que funcione con los nuevos cambios en QuickForm
[mecon/samurai.git] / sistema / www / sel-sistema.php
index b76280d159a74568b075744d25e15db7f3ac6084..0aa27ef7690ac08a85c12a89a2f4e273876173ce 100644 (file)
 // 
 
 //REQUIRE ONCE {{{
+    require_once 'HTML/Page.php';
     require_once 'MECON/HTML/QuickForm.php';
     require_once 'MECON/HTML/Tabla.php';
     require_once 'SAMURAI/Sistema.php';
 //}}}
 
 //CREO LOS OBJETOS NECESARIOS {{{
+   $PAGE    = new HTML_Page(array ('doctype'=>'HTML 4.01 Transitional',
+                                'charset'  => 'iso-8859-1',
+                                'lineend'  => 'unix',
+                                'language' => 'es',
+                                'cache'    => 'false',
+                                'simple'   => 'true'));
+    $PAGE->addStyleSheet('/MECON/css/marco.css');
     $FORM     = new MECON_HTML_QuickForm ('sel_sistema','post','sel-sistema');
     $TABLAFORM =& new MECON_HTML_Tabla ('width="400"', 'comun');
     $FORM->renderer->setTable($TABLAFORM);
     }
 // }}}
 // DIBUJO LA PAGINA {{{
-    $MARCO->habilitarLinks(false); //MODIFICAR ESTO CUANDO SE HAGA LA FUNCION DESHABILITAR LINKS
-    $MARCO->addBody($FORM);
-    $MARCO->display();
+    require_once 'MECON/HTML/Image.php';
+    $im =& new MECON_HTML_Image('images/copete.jpg');
+    $PAGE->addBodyContent($im);
+    $PAGE->addBodyContent($FORM);
+    $PAGE->addStyleSheet($FORM->getCSS());
+    $PAGE->setTitle('Seleccionar Sistema');
+    $PAGE->display();                          
 // }}}
 ?>