如何在標籤上顯示日期選擇器選定值

Question

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

嗨！

我想在標籤上顯示datepicker中的選定日期，但該標籤只顯示'30 .12.1899'日期，而不是我從日期選擇器中選擇的日期。

任何人有想法？感謝您的答案！

Answer 1

你的任務應該扭轉

day := Datetimepicker2.date; 

您也可以編寫代碼，而無需使用局部變量

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