怎么在edit里面自动显示日期时间。

Question

rt

Answer 1

用Win32组件页的DateTimePicker组件就好了~

Answer 2

Edit1.Text:=FormatDateTime('yyyy-mm-dd hh:mm:ss',DateTime);
再利用Timer控件，每隔一秒操作一次就可以了！

Answer 3

Edit1.Text:=FormatDateTime('yyyy-mm-dd hh:mm:ss',DateTime);
再利用Timer控件，每隔一秒操作一次就可以了！

Answer 4

怎么个自动法？
要显示日期就用FormatDateTime函数转换。
要将显示日期和时间转换回去就用StrToDateTime。
怎么操作方便合适就将代码放在相应的位置就可以了。

Answer 5

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Edit1.Text := FormatDateTime('yyyy-mm-dd hh:mm:ss' , Now);
end;