TDateTimePicker delphi 获取年月答案

【问题标题】：TDateTimePicker delphi get year and monthTDateTimePicker delphi 获取年月
【发布时间】：2014-07-14 13:10:48
【问题描述】：

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

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

如何从 TDateTimePicker 中重试年/日的值？

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

我想得到实际的年/月

类似

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

有什么方法可以实现吗？

【问题讨论】：

使用YearOf 和MonthOf 函数。或DecodeDate 立即获取它们。
谢谢先生！我知道有功能可以做到这一点，但我找不到它们。
你想回答@TLama？
@Andy_D，不，对不起。我没有时间为那个句子写一些童话故事:-)随意发布一个......
投反对票的人，请说出你投反对票的原因。

标签： delphi datetimepicker

【解决方案1】：

正如 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;

【讨论】：

【解决方案2】：

在DateUtils 中使用YearOf() 和MonthOf() 函数

您的代码将是：

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

如果DateTimePicker1.Date 中的值为27/8/2015 那么年份的值为 2015，月份为 8。

【讨论】：