TmonthCalendar e dias em negrido banco de dado

galera não sei bem como explicar como fazer isso
funciona assim
tenho um tela de cadastro de eventos, nela tem um campo data(logico que tem)
queria pegar o dia e deixar em negrito o TMonthCalendar
ate agora so fiz manualmente
com isso calendar1.BoldDays([5,8,12,15], MonthBoldInfo);
perceba que eu declaro os dias para deixar em negrito
mas não os dias salvos do banco de dados

uso delphi7 e mysql 5.0