Hola...
No he usado
Lazarus y desconozco mucho de el, pero al menos en
Delphi la clase
TCalendar contiene una propiedad llamada
UseCurrentDate, la cual tiene como valor predeterminado
True y le indica al control que use la fecha actual del sistema. Así que solo tienes que hacer:
Código Delphi
[-]
Calendar.UseCurrentDate := True;
Verifica si en Lazarus la clase tiene la misma propiedad y úsala.
Saludos...
Saludos...