[Casimiro Notevi]

¿No te sirve FormatDateTime?

Código Delphi [-]
var
  cFecha : string;
begin
  cFecha := FormatDateTime('yyyy-mm-dd hh:nn:ss',now);