colorear un día en un calendario

[jeremiselxi]

Muchas gracias José Luis Garcí.

Verifiqué el hilo anterior pero no se colorea el día.
Con el código siguiente puedo colorear los días que yo quiero los cuales están guardados en una tabla

Código Delphi [-]
{Si tenemos en una tabla un campo de tipo Date en la cual guardamos los días festivos,
 El codigo siguiente muestra como colorear el fondo de color rojo esos dias guardados en nuestra tabla.
}
sFecha := datetimetostr(ADate);
sFecha:= formatdatetime('yyyy-mm-dd',strtodate(sFecha));

sql := 'select * from diasfestivos where Fecha = "' + sFecha + '"';

Diasferiado.sql.clear;
Diasferiado.sql.add(sql);
Diasferiado.open;
Diasferiado.First;
if not Diasferiado.Eof then
begin
AColor:=clred;
end;

Me gustaría hacerlo con el mountcalendar pero no he podido hacerlo .

Si alguien sabe estoy a la espera de sus comentarios.

Saludos