Colorear celdas de TxBrowse()
Posted: Sat Apr 29, 2006 4:48 pm
Tengo un TxBrowse() con unas 60 columnas y 30 líneas. _ de la DBf se llaman "D01012006", "D02012006" etc... Como se ve, esos nombres se derivan de fechas, o sea, que son variables. La próxima vez que corra el programa pueden ser "D01042006", "D02042006", etc...
Me gustaría colorear el fondo de ciertas casillas de rojo o azul, según cumplan ciertas condiciones. Por ejemplo, las casillas > 1000 en rojo y las demás, en azul... El problema es que el no saber de antemano los nombres de las columnas, no puedo leer el campo directamente, sino utilizando (alias())->(Fieldget())
Lo mejor que he conseguido hasta ahora es:
Pero esto me pone en color rojo o azul TODA la columna, no sólo la casilla que quiero. ¿Alguien podría darme un ejemplo de cómo hacerlo, por favor?
Gracias,
Rafael
Me gustaría colorear el fondo de ciertas casillas de rojo o azul, según cumplan ciertas condiciones. Por ejemplo, las casillas > 1000 en rojo y las demás, en azul... El problema es que el no saber de antemano los nombres de las columnas, no puedo leer el campo directamente, sino utilizando (alias())->(Fieldget())
Lo mejor que he conseguido hasta ahora es:
Code: Select all
FOR i := 1 TO 60
oBrw:aCols[i]:bClrStd := {|| {CLR_WHITE, iif(fieldget(i) < 1000, CLR_BLUE, CLR_RED}
NEXT
Gracias,
Rafael