Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Olá pessoal,
Tenho neste link um exemplo de como consultar a situação do CPF e neste outro outras consultas consumindo webservice. Fiz um pequeno teste:
>
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
//Passando valores para campos da web.
WebBrowser1.OleObject.Document.all.Item('login', 0).value := 'teste';
WebBrowser1.OleObject.Document.all.Item('senha', 0).value := 'teste';
WebBrowser1.OleObject.Document.all.Item('cpf', 0).value := TxtCPF.Text;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
WebBrowser1.Navigate('http://ws.fontededados.com.br/consulta.asmx?op=SituacaoCadastralPF');
end;
Ele está funcionando perfeitamente, mas não sei como clicar no botão, pois não existe um ID ou um Name para o botão para implementar o click
>
WebBrowser1.OleObject.Document.all.Item('Button', 0).Click;
Contudo, isso não é o principal motivo deste post, este é apenas um teste. O principal motivo deste post é utilizar este webservice para, ao digitar o CPF meu campo receber o nome do dono deste CPF, pois é gerada em outra página um XML contendo o nome da pessoa.
Alguém sabe como posso resolver esse problema?
Grato,
Ilano.
Carregando comentários...