color por linea en Tbrowse

color por linea en Tbrowse

Postby Arturo Lopesoria » Wed Dec 19, 2007 8:38 pm

Alguien sabe como se puede cambiar el color de una linea del TBrowse en base a alguna condicion del registro o elemento?
Saludos
Arturo LS
User avatar
Arturo Lopesoria
 
Posts: 94
Joined: Fri Aug 10, 2007 1:47 am
Location: Mexico DF

Postby Antonio Linares » Wed Dec 19, 2007 9:17 pm

Arturo,

Este es un ejemplo para alternar los colores de cada línea:

oBrw:nClrPane := { || If( OrdKeyNo() % 2 == 0, RGB( 230, 230, 230), RGB( 190, 215, 190 ) ) }
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42078
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby luis.santeliz » Sun Dec 30, 2007 1:07 am

bueno yo lo uso de esta forma q es un poquitito mas rapido...

Code: Select all  Expand view
oBrw:nClrPane:={||IIF( (oBrw:Cargo:=!oBrw:Cargo) , RGB(193,221,255), RGB(221,245,255) )}


se me ocurre ahora q tambien puede ser...

Code: Select all  Expand view
oBrw:nClrPane:={||IIF( (oBrw:nAt%2 , RGB(193,221,255), RGB(221,245,255) )}
Luis Santeliz
Móvil SoftWare, C.A.
---------------------------------------------
MySQL DBA,
MySQL Server Performance Tunning,
DPxBase, FiveWin, Java,
Linux Redhat, Windows

Caracas Venezuela
luissanteliz@cantv.net
User avatar
luis.santeliz
 
Posts: 47
Joined: Mon May 29, 2006 9:04 pm

Postby Arturo Lopesoria » Thu Jan 03, 2008 1:31 am

Muchas Gracias, Me desonecte la ultima semana del año, pero ya ando por aca, realmente agradezco la pronta respuesta. Feliz Año 2008.

Antonio Linares wrote:Arturo,

Este es un ejemplo para alternar los colores de cada línea:

oBrw:nClrPane := { || If( OrdKeyNo() % 2 == 0, RGB( 230, 230, 230), RGB( 190, 215, 190 ) ) }
Arturo LS
User avatar
Arturo Lopesoria
 
Posts: 94
Joined: Fri Aug 10, 2007 1:47 am
Location: Mexico DF

Postby Arturo Lopesoria » Thu Jan 03, 2008 1:32 am

Gracias a ambos. Feliz Año nuevo.

luis.santeliz wrote:bueno yo lo uso de esta forma q es un poquitito mas rapido...

Code: Select all  Expand view
oBrw:nClrPane:={||IIF( (oBrw:Cargo:=!oBrw:Cargo) , RGB(193,221,255), RGB(221,245,255) )}


se me ocurre ahora q tambien puede ser...

Code: Select all  Expand view
oBrw:nClrPane:={||IIF( (oBrw:nAt%2 , RGB(193,221,255), RGB(221,245,255) )}
Arturo LS
User avatar
Arturo Lopesoria
 
Posts: 94
Joined: Fri Aug 10, 2007 1:47 am
Location: Mexico DF


Return to FiveWin para Pocket PC

Who is online

Users browsing this forum: No registered users and 23 guests