Código Delphi [-] FormatDateTime('yyyy-mm-dd', MonthCalendar1.Date)
FormatDateTime('yyyy-mm-dd', MonthCalendar1.Date)