Hora no edit

Colocara hora em um edit

//Coloque o seguinte no OnShow do formulario
Edit1.Text := 'Hoje é ' + DateToStr(Date) + ' as ' + TimeToStr(Time);