Delphi 获取MonthCalendar中选择的日期
代码说明:
Delphi 获取MonthCalendar中选择的日期,其实就是完成一个时间、日期的选择功能,年份、月份、日期、时间都可自定义调整并选择,这个简单的例子,可演示Delphi中MonthCalendar的用法,生成一个日期时间选择器功能。下面是相关代码: procedure TForm1.Button1Click(Sender: TObject); var Year,Month,Days: Word; begin DecodeDate(MonthCalendar1.Date,Year,Month,Days); Edit1.Text:=IntToStr(Year); Edit2.Text:=IntToStr(Month); Edit3.Text:=IntToStr(Days); end; 全部源码请下载本实例包。
下载说明:请别用迅雷下载,失败请重下,重下不扣分!


