Receber string de retorno em HTML

[geovanepc]

Boa noite a todos.

Como faço pra receber uma string de retorno de uma página HTML. Estou usando WebBrowser.

Essa mensagem é enviada pelo formulário Html no momento em que se preenche o edit referente ao email do Gmail.

Quando já se encontra em uso no servidor de email, o Html mostra a mensagem:

"Alguém já escolheu esse nome de usuário. Tente outro."

URL: https://accounts.google.com/SignUp?service=mail&continue=https%3A%2F%2Fmail.google.com%2Fmail%2F<mpl=default

 

*------------------------------------------------------------------------------------------------------------------------------------------*

Neste código Html, encontrei o id da mensagem que pretendo receber (EmailAddressExistsError):

 <DIV id=EmailAddressExistsError style="DISPLAY: none">Este endereço de e-mail já corresponde a uma Conta do Google. <A href="https://accounts.google.com/ServiceLogin?continue=https%3A%2F%2Fmail.google.com%2Fmail%2F&amp;service=mail&amp;dsh=-4282766058618552450">Faça login</A> ou, se você esqueceu sua senha, <A href="https://accounts.google.com/RecoverAccount?continue=https%3A%2F%2FmIail.google.com%2Fmail%2F&amp;service=mail">redefina-a</A>. </DIV>

Agora como faço para repassar essa string (Resultado) do Html para um Label ou Edit no Delphi?

Uso assim para receber valores do Html: 

Label4.Caption:=WebBrowser1.OleObject.document.all.tags('input').item('email').value;
Label5.Caption:=WebBrowser1.OleObject.document.all.tags('input').item('pass').value;

Mas só funciona com os IDs de input.

Testei assim, mas não funcionou:

Label5.Caption:=WebBrowser1.OleObject.document.all.tags('input').item('EmailAddressExistsError').value;

 Gera o erro:

Access violation

*---------------------------------------------------------------------------------------------------------------------------*

Tentei assim:

Label14.Caption := WebBrowser1.OleObject.Document.all.Item('EmailAddressExistsError', 0).Value;

 Gera o erro:

Method 'Value' not supported by automation object.

*---------------------------------------------------------------------------------------------------------------------------*

Segue em anexo a imagem com o resultado do teste de email.

Um forte abraço.

 

Obrigado à todos.

 

Editado Junho 24, 2016 por geovanepc

[Jhonas]

veja esse link

https://www.google.com.br/?gws_rd=ssl#q=WebBrowser.OleObject.+Document.+documentElement.+innerText

abraço

[geovanepc]

Excelente pesquisa, obrigado!

[Jhonas]

o componente webbrowser funciona usando o internet explorer ...

veja o componente chrome para o delphi ...tem as mesmas funcionalidades e um pouco mais

https://www.google.com.br/?gws_rd=ssl#q=chrome+delphi+component

abraço