procedure TForm1.MonthCalendar1Click(Sender: TObject); begin Edit1.Text := DateToStr(MonthCalendar1.Date); end;
Edit1.Text := FormatDateTime('dddddd', MonthCalendar1.Date); Edit1.Text := FormatDateTime('dd" "mmmm" "yyyy', MonthCalendar1.Date);
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question