... hDC, nRGB(200,0,0) ) else nOldClr := SetTextColor( hDC, ::nClrText ) endif *----- fin fjhg al tener una constante el el valor de la columna que se colorea en rojo, siempre es la misma columna, es decir la primera de izquierda a derecha, debería considerarse que la columna en rojo fuera la del domingo ...