Ver Mensaje Individual
  #2  
Antiguo 16-03-2007
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
Usa el evento OnGetItemStyleEvent

Allí tienes la fecha que se va a pintar, la fuente y el color, como esos 2 últimos son por referencia, puedes modificarlos a voluntad.

Código Delphi [-]
if (AStyleType = stDay) then
begin
  Acolor := clRed;
  AFont.Color := clYellow;
end;

Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita