BACKCOLOR en GRID y W 10
Posted: Fri Sep 11, 2020 3:30 pm
Hola,
Tengo un GRID VIRTUAL definido de la sgte manera
DEFINE GRID Grid_1
ROW 125
COL 15
WIDTH 1330
HEIGHT 320
WIDTHS { 150,70,70,90,70,70,70,80,110,80,120,200 }
HEADERS {'Cliente','TipoC','NroC','Fecha','Bult','%Bon','Total','Saldo','Localidad','P.P.','Representante','Observaciones'}
FONTNAME "Ms San Serif"
FONTSIZE 9
TOOLTIP ""
VIRTUAL .T.
MULTISELECT .T.
ITEMCOUNT 5000
ONQUERYDATA QueryLisvta()
JUSTIFY { BROWSE_JTFY_LEFT,BROWSE_JTFY_RIGHT, BROWSE_JTFY_RIGHT, BROWSE_JTFY_LEFT, BROWSE_JTFY_RIGHT,
BROWSE_JTFY_RIGHT, BROWSE_JTFY_RIGHT , BROWSE_JTFY_RIGHT , BROWSE_JTFY_LEFT, BROWSE_JTFY_RIGHT , BROWSE_JTFY_LEFT,
BROWSE_JTFY_LEFT}
DYNAMICBACKCOLOR { bColor , bColor , bColor ,bColor , bColor , bColor,bColor , bColor , bColor,bColor , bColor , bColor }
END GRID
Donde el BACKCOLOR lo tengo definido asi.
Private bColor := {||IF(LEn(iven) >= This.CellRowIndex,(IF(iven[This.CellRowIndex,2] == "Pres",{255,240,165}, IIF(iven[This.CellRowIndex,2]=="FC",{128,255,255}, {255,255,255 } ))) , {255,255,255 }) }
y me funciona correctamente en mi equipo con W7
Sin embargo cuando lo instalo en W10, no me muestra ningun cabio en los fondos del grid.
MUCHAS GRACIAS por cualquier ayuda que me puedan brindar.
GERARDO
Tengo un GRID VIRTUAL definido de la sgte manera
DEFINE GRID Grid_1
ROW 125
COL 15
WIDTH 1330
HEIGHT 320
WIDTHS { 150,70,70,90,70,70,70,80,110,80,120,200 }
HEADERS {'Cliente','TipoC','NroC','Fecha','Bult','%Bon','Total','Saldo','Localidad','P.P.','Representante','Observaciones'}
FONTNAME "Ms San Serif"
FONTSIZE 9
TOOLTIP ""
VIRTUAL .T.
MULTISELECT .T.
ITEMCOUNT 5000
ONQUERYDATA QueryLisvta()
JUSTIFY { BROWSE_JTFY_LEFT,BROWSE_JTFY_RIGHT, BROWSE_JTFY_RIGHT, BROWSE_JTFY_LEFT, BROWSE_JTFY_RIGHT,
BROWSE_JTFY_RIGHT, BROWSE_JTFY_RIGHT , BROWSE_JTFY_RIGHT , BROWSE_JTFY_LEFT, BROWSE_JTFY_RIGHT , BROWSE_JTFY_LEFT,
BROWSE_JTFY_LEFT}
DYNAMICBACKCOLOR { bColor , bColor , bColor ,bColor , bColor , bColor,bColor , bColor , bColor,bColor , bColor , bColor }
END GRID
Donde el BACKCOLOR lo tengo definido asi.
Private bColor := {||IF(LEn(iven) >= This.CellRowIndex,(IF(iven[This.CellRowIndex,2] == "Pres",{255,240,165}, IIF(iven[This.CellRowIndex,2]=="FC",{128,255,255}, {255,255,255 } ))) , {255,255,255 }) }
y me funciona correctamente en mi equipo con W7
Sin embargo cuando lo instalo en W10, no me muestra ningun cabio en los fondos del grid.
MUCHAS GRACIAS por cualquier ayuda que me puedan brindar.
GERARDO