Consultar e Obter Dados de Site

Question

Bom diaPreciso integrar uma aplica��o com um site que faz consultas.O pessoal do site me informou que devo enviar atrave&#347; do m�todo POST vari�veis como: login, senha e CPF do consultado. E que se...

Guinther · Answer

Dr

Tem sim, barbada. Se o valor de retorno � um XML, � bem prov�vel que se trate de um Web Service, a� basta usar o WSDL Importer do D7. Se for um site, vc pode fazer um POST manualmente e receber o valor de retorno. Abaixo tem um exemplo que fiz h� um tempo que faz post num servi�o do google.

procedure TForm1.Button2Click(Sender: TObject);
var
s: string;
Fields: TStrings;
p: integer;
begin
Fields := TStringList.Create;
Fields.Add(�text=� + memo1.lines.Text);
Fields.Add(�langpair=en|pt�);
s := IdHTTP1.Post(
�http://translate.google.com/translate_t�,Fields);
p := pos(�PHYSICAL�,s) + 9;
Memo1.lines.Clear;
while s[p] <> �<� do
begin
Memo1.lines.Text := Memo1.lines.Text + (s[p]);
p := p + 1;
end;
end;

Att,

Guinther Pauli
Editor Geral Revista ClubeDelphi
Editor Geral Revista .net Magazine Brasil
Microsoft Certified: MCP,MCAD,MCSD.NET,MCPD,MCTS
Delphi Certified: 3,5,6,7,2005,2006,Web,Kylix
http://guintherpauli.blospot.com
http://twitter.com/guintherpauli

F�rum Consultar e Obter Dados de Site #372915