[rafa1963]

Gracias por tu pronta respuesta German.
Lo he puesto de esta forma

Código Delphi [-]
{$R *.DFM}

function DateToISO8601(const ADate: TDateTime; AInputIsUTC: Boolean = true): string;
 Var
  FechaISO: string;
begin
  FechaISO := DateToISO8601(Now, False); // Now obtiene la fecha/hora actual
end;

y en el XML

Código Delphi [-]
SistemaInformatico.AddChild('FechaHoraHusoGenRegistro').Text := (FechaISO);

Pero me da error.
Me puedes ayudar ???.
Gracias