Source position: msepopupcalendar.pas line 52
procedure tpopupcalendarfo.formoncreate(
const sender: TObject
);