Re: efecto pijama en XBrowse (SOLUCIONADO)

[jvtecheto]

Hola:

En Browse con esta linea de codigo conseguia un efecto pijama, tenia una linea blanca y la otra verde, segun definicion del RGB
esto.

Code: Select all  Expand view  RUN

 LOCAL color1 := CLR_WHITE
LOCAL color2 := RGB( 211, 249, 236 )
oBrw:nClrPane := { || IIf( Obr->( ordKeyNo() ) % 2 = 0, color1, color2 ) }
 

ahora lo intento en Xbrowse con esta instruccion.

Code: Select all  Expand view  RUN

oBrw::bClrStd := {|| { nRGB( 0, 0, 0), nRGB(255,248,220) } } // colores para lineas normales
 

Pero solo consigo el color de texto en blanco y el fondo todo en el otro color, el efecto no es nada bonito.

¿Como podria conseguir ese efecto pijama en XBROWSE.?

Gracias por vuestra ayuda.

Jose.

[Bayron]

Intenta

Code: Select all  Expand view  RUN

oBrw:bClrStd  := { || If( Eval( oBrw:bKeyNo,,oBrw) % 2 == 0, { CLR_BLACK, RGB( 224, 236, 255 ) }, { CLR_BLACK, RGB( 189, 211, 253 ) } ) }

[jvtecheto]

Hola Bayron.

Funciona perfecto. Eres todo un experto del XBROWSE. Te felicito.

para terminar la migracion solo me falta una cosita un poco mas complicada pero bueno.
Para no liar hilos lo preguntare en otro.

Muchisimas gracias.

Un saludo.

Jose.