llenar datos en una WEB y obtener resultados

[cloayza]

Estimado Oscarac puede intentar lo siguiente:

Fuente de consulta: https://github.com/JossMP/sunatphp

1) Se debe obtener el numero aleatorio correspondiente al captcha, para ello se utiliza el siguiente enlace

http://e-consultaruc.sunat.gob.pe/cl...?accion=random

Código Delphi [-]
Const
URLCaptcha='http://e-consultaruc.sunat.gob.pe/cl-ti-itmrconsruc/captcha?accion=random';
var
  retval:String;
begin
    {Ejemplo...}
     edtCaptcha.Text:=IdHTTP1.Get(URLCaptcha);
end;

2) Lo siguiente es formar el URL para realizar la consulta.

Código Delphi [-]
URLQuery='http://e-consultaruc.sunat.gob.pe/cl-ti-itmrconsruc/jcrS00Alias?nroRuc=%s&accion=%s&numRnd=%s';

var
   url:String;
begin
     url:= Format(URLQuery,[edtRUC.Text,  {Número de RUC}
                               edtConsPorRuc.Text, {El contenido debe ser "consPorRuc"}
                               edtCaptcha.Text]);   {Numero aleatorio correspondiente al Captcha}

     memo1.lines.Text:=IdHTTP1.Get(url);
end;

En memo1 quedara el contenido de la pagina web, lo siguiente es buscar la información...


Espero le ayude...