datetimepicker获取年月日_Delphi DateTimePicker 日期 时间 设置 获取

1、设置 DateTimePicker 格式：

self.DateTimePicker_1.Format := 'yyyy/MM/dd HH:mm:ss';

(注意大小写)

2、获取 DateTimePicker 数据：

日期：self.DateTimePicker_1.Date

字符串形式：formatdatetime(self.DateTimePicker_1.Format,self.DateTimePicker_1.Date)

时间：self.DateTimePicker_1.Time

字符串形式：formatdatetime(self.DateTimePicker_1.Format,self.DateTimePicker_1.Time)

(备注：function FormatDateTime(const Format: string; DateTime: TDateTime): string;

命名空间(namespace) System.SysUtils )

3、设置 DateTimePicker 数据

前提：设置DateTimePicker 格式

1)获取当前日期时间：

日期：self.DateTimePicker_1.Date := Now();

时间：self.DateTimePicker_1.Time := Now();

备注：控件会根据DateTimePicker.Format自动截取需要的数据

2)自定义日期时间(string)：

不管是日期还是时间都需要借助类TFormatSettings(同样在 System.SysUtils中)，代码如下：

定义参数var FSetting:TFormatSettings;

实例化：FSetting := TFormatSettings.Create(LOCALE_USER_DEFAULT);

根据自定义的参数(string)设置FSetting日期时间格式：

日期：FSetting.ShortDateFormat := 'yyyy-MM-dd';

FSetting.DateSeparator := '-';//也可以是 '/'，根据传入参数设置

self.DateTimePicker_1.Date := strToDateTime(Date_in,FSetting);//Date_in日期(string)

备注：日期最短是月日('MM-dd')，如果想只是设定‘日’，也可先把Date_in转化为如：12-20，代码：

Date_in := '20';

Date_in := '12-'+Date_in;

FSetting.ShortDateFormat := 'MM-dd';

FSetting.DateSeparator := '-';

self.DateTimePicker_1.Format := 'dd';

self.DateTimePicker_1.Date := strToDateTime(Date_in,FSetting);

这样控件就可以自动获取日期中的‘日’了。

时间：FSetting.ShortTimeFormat := 'HH:mm:ss';

FSetting.TimeSeparator := ':';

self.DateTimePicker_1.Time := strToDateTime(Time_in,FSetting);// Time_in日期(string)