在线求救！！！菜鸟级问题···DateTimePicker 怎样显示当天日期 ··· 谢谢！！！

Question

DateTimePicker 在控件的date属性里显示当天的日期DateTimePicker2.XXXX := DateToStr(Date);谢谢各位大哥！！！

Answer 1

unit1.frm_main.DateTimePicker2.date:=Date;
  unit1.frm_main.DateTimePicker2.datetime:=now; jinjazz(近身剪（N-P攻略）)  大哥好像不行啊 ？？？

Answer 2

procedure Tfrm_login.FormCloseQuery(Sender: TObject;
  var CanClose: Boolean);
begin
  unit1.frm_main.StatusBar1.Panels[0].Text := '      当前用户：  ' +     unit1.frm_main.username ;
  unit1.frm_main.StatusBar1.Panels[1].Text := FormatDateTime(' yyyy-mm-dd ', now);
  unit1.frm_main.DateTimePicker2.date:=now;
end;程序基本就是这样

Answer 3

unit1是什么意思,Datetimepicker1.date:=now;