delphi MonthCalendar1 获取选中日期

本文整理自网络，侵删。

 


uses DateUtils;

procedure TForm1.MonthCalendar1Click(Sender: TObject);
begin
caption:= YearOf(MonthCalendar1.Date).ToString + '-' + MonthOfTheYear(MonthCalendar1.Date).ToString + '-' + DayOfTheMonth(MonthCalendar1.Date).ToString;
//caption:=DateTimeToStr(MonthCalendar1.Date);
end;
 

相关阅读 >>

Delphi动态创建30个按钮，每行6个共5行，顺序排列

Delphi xe并行编程：ttask

Delphi写的一个屏幕截取函数

Delphi研究之驱动开发篇（二）--工具及环境搭建

Delphi firemonkey里触发home按键被按下的事件

Delphi doc转txt

Delphi制作透明窗体

Delphi 给字加边的又一个算法

Delphi读取xml文件

Delphi xe android判断程序是否在运行

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi MonthCalendar1 获取选中日期