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
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,
edtConsPorRuc.Text,
edtCaptcha.Text]);
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...