La Web del Programador: Comunidad de Programadores
https://www.lawebdelprogramador.com/foros/FoxPro-Visual-FoxPro/857965-Varios-colores-en-un-grid.html

Varios colores en un grid

Varios colores en un grid

Publicado por Jorgito (82 intervenciones) el 22/08/2007 22:55:00
Tengo un grid con campos solo de salida. Quisiera saber como puedo poner mas de 3 colores diferentes en el grid dependiendo del valor de un campo.
gracias

RE:Varios colores en un grid

Publicado por Jorge (15 intervenciones) el 22/08/2007 23:29:20
En este Grid muestro distintos colores de acuerdo a los valores del campo Ingresos: de 1 a 99, 100 a 199, 200 a 299, etc
Para elllo debes crear un nuevo método del Formulario:
MiColor() y colocar esto:

LPARAMETERS tdBD
lnColor = 0xFFFFFF && Blanco
lningresos = ingresos && Campo de la Tabla

DO CASE
CASE BETWEEN(lningresos,1,99)
lnColor = RGB(128,255,128)
CASE BETWEEN(lningresos,100,199)
lnColor = RGB(255,255,0)
CASE BETWEEN(lningresos,200,299)
lnColor = RGB(255,128,255)
CASE BETWEEN(lningresos,300,399)
lnColor = RGB(255,91,91)
CASE BETWEEN(lningresos,400,499)
lnColor = RGB(0,255,0)
ENDCASE

RETURN lncolor

* Y en el Procedimiento INIT del Grid debes poner : (donde INGRESOS es
* el nombre del campo de la tabla)

Thisform.Grid1.SetAll("DynamicBackColor",;
"Thisform.MiColor(Ingresos)","Column")

RE:Varios colores en un grid

Publicado por Plinio (7841 intervenciones) el 24/08/2007 13:19:19
En el Init del form probar algo como

Thisform.Grid1.SetAll("DynamicBackColor",;
"IIF(valor=1,RGB(255,0,0),IIF(valor=2,RGB(0,255,0),RGB(0,0,255))","Column")