Kra tu pode fazer isso usando o componente Indy: IdHttp
nele tu faz mais ou menos assim:
IdHTTP.Host:= 'www.blah.com';
IdHTTP.Connect;
Memo.Lines := IdHTTP.Get('index.html');
IdHTTP.Disconnect;
O get é a função q traz o source....
O componente IdHttp é bem interessante ele pode retornar
o web server e um monte de coisa. Um exemplo bom disso
é um projeto que fiz que tah no meu site. O RetornaWeb
(http://linux.fuhrfoda.org/retornaweb.html) foi feito em Kylix mas
no delphi é igualzito. Fiz a versão dele pra win tb. Um dia desses
disponibilizo. Da uma olhada no fonte (GPL) e vc vai ver o uso
do IdHttp....
Führ
Gercil Junio wrote:
>Bom dia galera
>Bom...
>Tem como pegar o código fonte de um site aberto no TWebBrowser
>igual no Internet Explorer (Exibir > Código Fonte)
>
>só que no TWebBrowser ao invés de abrir em um TXT eu quero que mostre em um memo.
>Tem como fazer isso ? Se tiver, como faz?
>Abraços!!
>
>[As partes desta mensagem que não continham texto foram removidas]
>
>
>
>
>
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
