Para la hora del sistema puedes usar:
Código Delphi
[-]
Edit1->Text = Now().CurrentDate();
Así lo hago en c++ builder, debe ser muy similar en delphi, busca en la ayuda sobre Now() y como formatear fechas para que puedas usar solo la parte que necesites.
Saludos.