XML vacio o no existente bajo android

[Esteban74]

Hola, los molesto con esta consulta, estoy intentando descargar un archivo XML desde una web y grabarlo en el almacenamiento interno de un celular sin resultados obteniendo el sig mensaje "XML document must have a top level element. Line:1"
Este es el codigo con problemas:

Código Delphi [-]
/////////////////////////////////////////////////////////////////////////////////////////////////////
procedure TModuloDatos.Obtenerclima;
var
 consulta, archivo: string;
 buffer:TFileStream;

begin

 consulta:=direccionweb+ tabLocalidades.FieldByName('id').AsString;        

 {$IFDEF Android}
   archivo := TPath.Combine(tpath.getdocumentspath ,'datosclima.xml');
 {$ENDIF}

 {$IFDEF MSWINDOWS}
   archivo := extractfilepath(paramstr(0)) + 'datosclima.xml';
   frmPrincipal.Memo1.Lines.Add(archivo);
 {$ENDIF}

 try
  Buffer := TFileStream.Create(archivo, fmCreate{ or fmShareDenyWrite});
  try
   WebTuTiempo.Get(Consulta,Buffer);
  except on E: Exception do
  end;
 finally
  Buffer.Free;
 end;
 frmPrincipal.Memo1.Lines.Add(archivo);                 // la ruta aparece correctamente
 frmPrincipal.Memo1.Lines.LoadFromFile(archivo);   // esto no carga nada bajo android 

end;
/////////////////////////////////////////////////////////////////////////////////////////////////////

el codigo funciona correctamente bajo windows pero bajo entorno android falla con el mensaje del inicio y el loadFromFile no carga nada como si el xml estubiera vacio.
No soy un experto, solo me motiva mi curiosidad, ganas de aprender y deceos de hacer algo en esta cuarentena, si alguien puede darme una ayuda le estaria muy agradecido, gracias por su tiempo.