Ver Mensaje Individual
  #5  
Antiguo 06-01-2015
Avatar de jeremiselxi
jeremiselxi jeremiselxi is offline
Miembro
 
Registrado: ago 2008
Posts: 199
Reputación: 16
jeremiselxi Va por buen camino
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
__________________
Cristo te ama, ven a d él, ya k te espera con los brazos abiertos. Dios te bendiga mucho
Responder Con Cita