TDateTimePicker delphi得到年份和月份

时间:2014-07-14 13:10:48

标签: delphi datetimepicker

我有一个内置于SQL的SP,它有2个参数,一个是年份,另一个是月份。

在delphi中,我在框架上添加了一个TDateTimePicker,以便让用户选择月份和年份。

如何从TDateTimePicker中检索年/日的值?

我试过了DateTimePicker2.Date;,但这给了我一个格式为“xx / xx / xxxx”的日期

我想获得实际的年/月

类似

int year ;
year :=  DateTimePicker2.Date.Year;

有什么方法可以实现这个目标吗?

2 个答案:

答案 0 :(得分:5)

正如TLama所说,你可以像这样使用DecodeDate函数: -

Var
  lDay,
  lMonth,
  lYear : Word;
Begin
  DecodeDate(DateTimePicker2.Date, lDay, lMonth, lYear);
  MyStoredProc.Params[0].AsInteger := lDay;
  MyStoredProc.Params[1].AsInteger := lMonth;
  MyStoredProc.Execute;
End;

答案 1 :(得分:3)

YearOf()

中使用MonthOf()DateUtils个功能

您的代码将是:

year := YearOf(DateTimePicker1.Date);
month := MonthOf(DateTimePicker1.Date);

如果DateTimePicker1.Date中的值为27/8/2015 然后年份的价值是2015年,月份是8。