by Willi Quintana » Mon Jun 16, 2008 3:04 am
Solucionado.,. sorry..
oLbxR:bTextColor := { |nRow,nCol|ColorRegComVen(nCol))}
Function ColorRegComVen(nCol)
DO CASE
CASE nCol = 1 .OR. nCol = 4 .OR. nCol = 9 // fecha y ruc
Return CLR_GREEN
CASE nCol = 2 // valores
Return CLR_HBLUE
CASE nCol = 3 // valores
Return CLR_BLUE
CASE nCol = 5 .OR. nCol = 6 .OR. nCol = 7 .OR. nCol = 8 // valores
Return CLR_HBLUE
ENDCASE
Return CLR_BLACK