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;
 

相关阅读 >>

elphi中取出字符串中指定位置的几个字符

Delphi get_hd_serial() 获得磁盘驱动器序列号

Delphi做繁体简体转换

Delphi 获取鼠标与键盘空闲时间

Delphi 安卓添加资源图片并读取

Delphi 校验手机号及身份证号

Delphi 自动把combobox控件的内容里没有的内容加入列表中

Delphi 取正在运行的dll或exe的路径

Delphi xe 共享一个之前封装的多进程共享内存的memorystream

Delphi pchar和array [0..255] of char的区别

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

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