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

Delphi 如何在标签上显示datepicker选定值,delphi,delphi-7,Delphi,Delphi 7,嗨 我想在标签上显示从datepicker选择的日期,但标签只显示“30.12.1899”日期,而不是我从datepicker选择的日期 有人有主意吗?谢谢你的回答 您的作业应该颠倒过来 procedure TForm1.DateTimePicker2Change(Sender: TObject); var day:tdatetime; begin Datetimepicker2.date:=day; label1.caption:=(FormatDateTime('dd.mm.yyyy', d

我想在标签上显示从datepicker选择的日期,但标签只显示“30.12.1899”日期,而不是我从datepicker选择的日期


有人有主意吗?谢谢你的回答

您的作业应该颠倒过来

procedure TForm1.DateTimePicker2Change(Sender: TObject);
var
day:tdatetime;
begin
Datetimepicker2.date:=day;
label1.caption:=(FormatDateTime('dd.mm.yyyy', day));
您也可以在不使用局部变量的情况下编写该代码

day := Datetimepicker2.date;

您应该启用编译器警告,然后注意它们。编译器将告诉您正在使用未初始化的变量。
procedure TForm1.DateTimePicker2Change(Sender: TObject);
begin
  label1.caption:=(FormatDateTime('dd.mm.yyyy', Datetimepicker2.date));
end;