Delphi - formato de fecha

Hola
Mi pregunta es la siguiente: ¿existe alguna forma de darle un formato a una fecha sin usar la función FormatDateTime? El problema es que devuelve un string, pero yo necesito que me devuelva un datetime en formato mm/dd/yyyy hh:nn:ss, obviamente sin tener que cambiar la configuración regional de windows.
Gracias de antemano.

Tienes las funciones DecodeDate() y DecodeTime() a las que les pasas un valor en formato TDateTime (como el que devuelve Now()) y dichas funciones te devuelven en variables separadas las horas, los minutos, los segundos y los milisegundos así como el día, el mes y el año. Más o Menos son así:

procedure ImprimeHoraYFecha();
var Hora, Min, Seg, MSeg, Dia, Mes, Año: Word;
begin
DecodeDate(Now(),Año,Mes,Dia);
DecodeTime(Now(),Hora, Min, Seg, MSeg);
Label1.Caption := Format("Fecha %2d/%2d/%d, Hora %2d:%2d:%2d",[Dia,Mes,Año,Hora,Min,Seg]);
end;

Saludos.

Cualquier funcion que formatee una fecha te devolvera un string, debido a que el TDateTime es un double, asi que no tiene formato, solo toma el formato de la configuracion regional de windows,