Plinio,

The Init event fires only once when control get instaniated.
You'll have to move your code to the custom method, say SetDaysBold and call it from Init and every other place where month or year changes.


>I designed a Scheduler on a form. On my calendar control I show some days with bold fonts. I use the next lines of codes (Init Event):
>
>FOR i = 1 TO 42
> SEEK CTOD(SUBSTR(TTOC(Thisform.Olecalendar.Object.Visibledays(i)),1,10))
> IF FOUND()
> Thisform.OleCalendar.Object.DayBold(ttoc(Thisform.OleCalendar.Object(i))) = .t.
> ENDIF
>
>ENDFOR
>
>This work fine, but when I change the month and back again this does not work.
>
>Thanks