Marcar una fecha en un TMonthCalendar

[[Lepe]]

¡¡ qué guapada !!

¿eso era mío? vaya tuneo que le has pegado!!
los 7 paneles le dan una apariencia tremenda.

Como no tenía Delphi a mano, he creado la ruta "c:\program files\ ... Projects 6.1" para probarlo, me ha gustado mucho.

En el foro he visto usar una función muy útil para el calendario. Cuando cambiamos de mes, se produce un parpadeo lógico de la pantalla, porque se borra el calendario y se crea de nuevo, bien, ese parpadeo puede evitarse:

Código Delphi [-]
 procedure TForm1.CreaCalendario;
...
begin
    LockWindowUpdate(self.Handle);
// aquí el contenido original de esta rutina
    LockWindowUpdate(0);
end;

El calendario ya se encuentra en el ftp: Directorio raíz » Delphi-Win32 » Ejemplos. Si puediera eliminarse y poner el tuyo con las modificaciones, sería fantástico.

Saludos de "Maestro" a "Maestro"