Alaska Software Inc. - TBrowse()
Username: Password:
AuthorTopic: TBrowse()
Jorge LTBrowse()
on Sat, 04 Dec 2010 10:10:26 -0300
Hola a todos

es posible con la clase tbrowse ir pintando las filas pares de un color y 
las imprares de otro color como en el xbpbrowse

si es posible, tendrían algún ejemplo ?

gracias
Osvaldo Ramirez Re: TBrowse()
on Sat, 04 Dec 2010 22:23:01 -0700
On 12/4/2010 6:10 AM, Jorge L wrote:
> Hola a todos
>
> es posible con la clase tbrowse ir pintando las filas pares de un color
> y las imprares de otro color como en el xbpbrowse
>
> si es posible, tendrían algún ejemplo ?
>
> gracias
>
Debo tener algo del viejo clipper, buscare a ver q encuentro y les comento.

Saludos
AUGE_OHRRe: TBrowse()
on Sun, 05 Dec 2010 07:46:50 +0100
hi,

> es posible con la clase tbrowse ir pintando las filas pares de un color y 
> las imprares de otro color como en el xbpbrowse

why not ask in "international" News Forum 

in general Tbrowse, better TBColumn() have :colorSpec and :defColor
it also have :Colorblock which override :defColor

so use your XbpBrowse "Zebra" Class and change all to Tbrowse Class

greetings by OHR
Jimmy
Jorge LRe: TBrowse()
on Mon, 06 Dec 2010 11:18:04 -0300
Hola Jimmy
uso esta manera para pintar entera la fila del cursor

   oB:colorRect( { 1, 1, oB:rowCount, 2 }, { 1, 2 } )
   oB:colorRect( { 1, oB:leftVisible, oB:rowCount, oB:rightVisible }, { 1, 
2 } )

   oB:colorRect( { oB:rowPos, oB:leftVisible, oB:rowPos, oB:rightVisible }, 
{ 2, 1 } )
   oB:colorRect( { oB:rowPos, 0, oB:rowPos, 2 }, { 2, 1 } )

   oB:cargo :=If( (oB:rowPos = oB:rowCount), oB:rowPos -1, oB:rowPos )

voy a estudiar los métodos que has mencionado a ver si puedo lograrlo,
gracias



"AUGE_OHR"  escribió en el mensaje de 
noticias:346f5046$26a4b06a$8da66@news.alaska-software.com...

hi,

> es posible con la clase tbrowse ir pintando las filas pares de un color y 
> las imprares de otro color como en el xbpbrowse

why not ask in "international" News Forum 

in general Tbrowse, better TBColumn() have :colorSpec and :defColor
it also have :Colorblock which override :defColor

so use your XbpBrowse "Zebra" Class and change all to Tbrowse Class

greetings by OHR
Jimmy