Source position: msepopupcalendar.pas line 56
procedure tpopupcalendarfo.moup(
const sender: TObject
);