请问怎么获取datetimepicker1的月份

Question

var yy,mm,dd : word;decodedate(datetimepicker1.datatime,yy,mm,dd);mm就是你要的。

Answer 1

pnmonth:=formatDateTime('mm',DateTimePicker1.DateTime)

Answer 2

procedure TForm1.Button2Click(Sender: TObject);
var
 ADate:TDateTime;
 year,month,day:word;
begin
   ADate:=DateTimePicker1.Date;
   decodedate(ADate,year,month,day);
   Label1.Caption:='Now is '+Inttostr(month)+'月份';
end;

Answer 3

哎，再来一试，johnsonrao(johnson) 的又可以了，怪，解决了，谢谢！