Ver Mensaje Individual
  #1  
Antiguo 10-01-2018
wilcg wilcg is offline
Miembro
 
Registrado: abr 2014
Posts: 107
Reputación: 11
wilcg Va por buen camino
Adaptar código a FMX Android

Amigos del foro nuevamente por aqui,
Estoy realizando una aplicación Android, y necesito ayuda con este codigo. Ya que para WINDOWS funciona correctamente y para ANDROID me da error.
Código Delphi [-]
const
  URL = 'http://www.sunat.gob.pe/cl-at-ittipcam/tcS01Alias';
Código Delphi [-]
// Obtenemos la página
  IdHTTP1.Get(URL);

  // Efectuamos el POST con los parámetros requeridos
  Params := TStringList.Create();
  Params.Values['anho'] := '2018';
  Params.Values['mes'] := '1';

  try
    Response := IdHTTP1.Post(URL, Params);
  finally
    Params.Free;
  end;

  // Creamos un documento HTML con los datos obtenidos
  Documento := coHTMLDocument.Create as IHTMLDocument;  //<<<<<<<<=====AQUI ME MARCA EL ERROR  ===========>>>>>>>>
  Documento.Write(Response);
  Documento.Close();
Como convertir esa linea a ANDROID o alguna solución diferente pero que haga la misma función.
Responder Con Cita