]> git.llucax.com Git - mecon/meconlib.git/blob - lib/Marco/MenuVertical.php
Se borra SAMURAI lib porque se pasó al repositorio del SAMURAI.
[mecon/meconlib.git] / lib / Marco / MenuVertical.php
1 <?php
2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
3 // +----------------------------------------------------------------------+
4 // | PHP Version 4                                                        |
5 // +----------------------------------------------------------------------+
6 // | Copyright (c) 1997-2003 The PHP Group                                |
7 // +----------------------------------------------------------------------+
8 // | This source file is subject to version 2.02 of the PHP license,      |
9 // | that is bundled with this package in the file LICENSE, and is        |
10 // | available at through the world-wide-web at                           |
11 // | http://www.php.net/license/2_02.txt.                                 |
12 // | If you did not receive a copy of the PHP license and are unable to   |
13 // | obtain it through the world-wide-web, please send a note to          |
14 // | license@php.net so we can mail you a copy immediately.               |
15 // +----------------------------------------------------------------------+
16 // | Created: Tue Apr 29 12:35:45 2003
17 // | Author:  Martin Marrese <mmarre@mecon.gov.ar>
18 // +----------------------------------------------------------------------+
19 //
20 // $Id$
21 // $Author$
22 // $URL$
23 // $Date$
24 // $Rev$
25 //
26
27 #require_once 'PEAR.php';
28
29
30 // +X2C includes
31 require_once 'Menu.php';
32 // ~X2C
33
34 // +X2C Class 103 :MenuVertical
35 /**
36  *
37  * @access public
38  */
39 class MenuVertical extends Menu {
40     // ~X2C
41
42
43     // +X2C Operation 110
44     /**
45      * Constructor. Recibe el nombre del directorio en donde esta instalado el sistema
46      *
47      * @param  string $directorio Directorio en donde se encuentra el sistema
48      *
49      * @return void
50      *
51      * @access public
52      */
53     function MenuVertical($directorio = null) // ~X2C
54     {
55         parent::Menu($directorio);
56     }
57     // -X2C
58
59     // +X2C Operation 141
60     /**
61      * Funcion para agregar el cuerpo de la pagina a la pagina
62      *
63      * @param  string $body Cuerpo del mensaje para agregar a la pagina
64      * @param  string $titulo Titulo de la seccion seleccionada
65      *
66      * @return void
67      *
68      * @access public
69      */
70     function addBody($body, $titulo) // ~X2C
71     {
72         $c= count($this->_componentes); 
73         
74         $tmp = $this->_componentes;
75         $this->_componentes = array ();
76         $this->_armarArraySecciones($tmp);
77         
78         $TABLA = new HTML_Table('width=160 align="left" bgcolor="#FFFFFF" cellspacing="0" cellpadding="0" border="0" height="1"');             
79         $menu ='<img src="/www/images/carpeta0" border="0">&nbsp;<font face="Arial, Helvetica, sans-serif" size="2" color="#000000"><b>'.$titulo.'</b></font>';
80         $row = array ($menu);
81         $TABLA->addRow($row,'align="left" bgcolor="#FFFFFF" height="1"');        
82         $TABLA->updateCellAttributes(0,0,'colspan="2"');
83        
84         foreach ($this->_componentesVertical as $comp) {
85             $row = array ('<img src="/www/images/carp" border="0">',' ');
86             $TABLA->addRow($row);        
87             $TABLA->addRow($comp,'align="left" bgcolor="#FFFFFF" height="1"');
88             $TABLA->updateColAttributes(0,'align="right" width="34"');
89             $TABLA->updateColAttributes(1,'align="left"');
90         }
91         $TABLA->updateCellAttributes(0,0,'align="left"');
92         $row = array ($TABLA->toHtml());
93         $this->_tabla->addRow($row,'width=160 align="left" bgcolor="#FFFFFF" valign="top" rowspan="2"');
94  
95         $tmp='<BR>';
96         foreach ($body as $bod) {
97             if (is_object($bod)) {
98                 if (method_exists($bod,'toHtml')) {
99                     $tmp.=$bod->toHtml();
100                 }
101                 else {
102                     trigger_error('El metodo no existe! - '.get_class($bod).'::toHtml()', E_USER_WARNING);
103                 }                
104             }
105             else {
106                 $tmp.=$bod;
107             }
108         }        
109         $row = array ($tmp);
110         $this->_tabla->setCellContents  (1,1,$row);
111         $this->_tabla->setCellAttributes(1,1,'align="center" bgcolor="#FFFFFF"');
112
113         $this->_tabla->updateColAttributes (1,'width="600"');
114     }
115     // -X2C
116
117 } // -X2C Class :MenuVertical
118
119 ?>