topic-17274

Posts: 270

Joined: Fri Nov 11, 2005 07:39 PM

Antonio - Toutlook 2003 -
Posted: Fri Nov 06, 2009 12:46 PM

Estimado Antonio y amigos del Foro:

Hace varios días que publique esta duda y nadie de las 147 personas que la han leido mi mensaje anterior, tiene
alguna idea. Será muy loca o descabellada mi solicitud ?

El motivo es que necesito un menú al lado izquierdo, que pueda tener letras grandes y con reglones,
y esta clase esta perfecta, pero se pierde un espacio importante al inicio, el cual necesito eliminar.

Ver la foto adjunta:

Es posible hacer lo que menciono , sacar o ocultar la parte de arriba o yo soy el muy "tonto"

,
que no me doy cuenta como hacerlo.

Alguien podría orientarme como abordar este tema.

Saludos y perdonen mi insistencia ,

Juan
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl

joseluisysturiz

Posts: 2064

Joined: Fri Jan 06, 2006 09:28 PM

Re: Antonio - Toutlook 2003 -
Posted: Fri Nov 06, 2009 02:59 PM

???

Dios no está muerto...

Gracias a mi Dios ante todo!

jcaro

Posts: 270

Joined: Fri Nov 11, 2005 07:39 PM

Re: Antonio - Toutlook 2003 -
Posted: Fri Nov 06, 2009 04:36 PM

Hola Jose Luis cual es tu duda ??

Juan
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl

joseluisysturiz

Posts: 2064

Joined: Fri Jan 06, 2006 09:28 PM

Re: Antonio - Toutlook 2003 -
Posted: Fri Nov 06, 2009 08:59 PM

jcaro wrote:Hola Jose Luis cual es tu duda ??

Saludos man, no tengo duda, eso lo hago para seguir el POST y si te dan solucion la tomo, gracias... aun no uso esa clase, pero como ya salio una cuestion la sigo por si a mi se pe presenta ya tener solucion, bajo los temas y soluciones a mi pc haciendo mi propio sistema de ayuda OFF LINE...

Dios no está muerto...

Gracias a mi Dios ante todo!

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: Antonio - Toutlook 2003 -
Posted: Fri Nov 06, 2009 11:01 PM

Juan,

Habria que modificar un poco la clase original.

En concreto habria que añadir una nueva DATA nTop en la clase TOutLook2003Group. De hecho, la única diferencia entre la cabecera superior, y los items de abajo, es que el valor nTop se calcula de forma distinta a la hora de pintarlos:

Code (fw): Select all Collapse

   if ::lHeader
      nTop = 0
   else
      nTop = oCon:nHeight - ;
             ( ( Len( oCon:aGroups ) + 1 - AScan( oCon:aGroups, { | o | o == Self } ) ) * 32 )
   endif

Asi en vez de calcular nTop, tomariamos el valor ::nTop y asi se podrian dibujar en la posición que quisieramos.

Ese seria el primer cambio. Luego habria que probar la clase y ver que otros cambios pueda requerir.

regards, saludos

Antonio Linares
www.fivetechsoft.com

jcaro

Posts: 270

Joined: Fri Nov 11, 2005 07:39 PM

Re: Antonio - Toutlook 2003 -
Posted: Tue Nov 10, 2009 12:40 PM

Antonio:

Muchas gracias por responder , ayer no vine a la oficina, por eso no habia contestado antes.

Voy a estudiar lo que me señalas y comenzaré a realizar algunas pruebas. Cualquier avance , te comento.

Saludos,

Juan
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl

FiveTech Support Forums

Continue the discussion