TDateTimePicker delphi得到年份和月份

Ciu*_*caS 2 delphi datetimepicker

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

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

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

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

我想得到实际的年/月

就像是

int year ;
year :=  DateTimePicker2.Date.Year;
Run Code Online (Sandbox Code Playgroud)

有什么办法可以实现吗?

And*_*y_D 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;
Run Code Online (Sandbox Code Playgroud)