如何在标签上显示datepicker选定值

Question

procedure TForm1.DateTimePicker2Change(Sender: TObject);
var
day:tdatetime;
begin
Datetimepicker2.date:=day;
label1.caption:=(FormatDateTime('dd.mm.yyyy', day));

嗨!

我想在标签上显示datepicker中的选定日期,但标签只显示'30 .12.1899'日期,而不是我从datepicker中选择的日期.

有人有想法吗？谢谢你的回答!

Answer 1

你的任务应该颠倒过来

day := Datetimepicker2.date;

您也可以在不使用局部变量的情况下编写该代码

procedure TForm1.DateTimePicker2Change(Sender: TObject);
begin
  label1.caption:=(FormatDateTime('dd.mm.yyyy', Datetimepicker2.date));
end;