Lo primero que hay que saber es si tu versión de Delphi soporta la función que te he puesto: DateToISO8601
Si la soporta, sólo debes usarla para convertir tu valor de fecha en una cadena (string):
Código Delphi
[-]implementation
{$R *.dfm}
uses
System.DateUtils;
procedure TForm4.Button1Click(Sender: TObject);
var
fecha:TDateTime;
str1, str2:string;
begin
fecha := Date(); str1 := DateToISO8601(fecha, True);
str2 := DateToISO8601(fecha, False);
ShowMessage('Fecha con AinputUTC a True: ' + str1 + sLineBreak +
'Fecha con AinputUTC a False: ' + str2);
end;
Si tu dato viene de un campo como comentas, pues utiliza el valor del campo (no del componente), por ejemplo:
Código Delphi
[-]str2 := DateToISO8601(Tabla1.FieldByName('CampoFecha').AsDateTime, False);
Si tu versión de delphi no lo soporta, pues deberás formatearla tú como has hecho más arriba con un
FormartDateTime.