//---------------------------------------------------------------------------
#include 
//---------------------------------------------------------------------------
TDateTime Czas = Now();
Edit1->Text = Czas.FormatString("yyyy-mm-dd hh:nn:ss");
Edit1->Text = TDateTime::CurrentDateTime().FormatString("yyyy-mm-dd hh:nn:ss"); 
 
// Wstawianie dowolnego tekstu w formacie - koniecznie w apostrofach 
TDateTime::CurrentDateTime().FormatString("yyyy-mm-dd 'godz.' hh:nn:ss"); 
 
//---------------------------------------------------------------------------
// Alternatywna metoda:
TFormatSettings fSettings = TFormatSettings::Create(LOCALE_SYSTEM_DEFAULT);
fSettings.DateSeparator = '-';
fSettings.ShortDateFormat = "yyyy/mm/dd";
fSettings.TimeSeparator = ':';
fSettings.LongTimeFormat = "hh:mm:ss";
    
UnicodeString DataTxt;
DataTxt = DateToStr(TDateTime::CurrentDateTime(), fSettings);      // Wynik: 2017-01-25
DataTxt = DateTimeToStr(TDateTime::CurrentDateTime(), fSettings);  // Wynik: 2017-01-25 10:20:00
DataTxt = TimeToStr(TDateTime::CurrentDateTime(), fSettings);      // Wynik: 10:20:00
//---------------------------------------------------------------------------

Przykład