[TUTORIAL] Criar navegador com abas sem usar motor do IE

[_Luckee_ 0]

Fala pessoal!

Vi um post do Owner que fala sobre o componente EmbeddedWB que funciona como se fosse um TWebbrowser normal, mas este usa um motor próprio e vem cheio de opções.

Como disse, depois de ver o post resolvi fazer este tuto para ensinar vcs a fazer um navegador de abas simples usando o EmbeddedWB e usando tambem uma ferramenta não é muito usada pelos programadores, que é o TFrame.

 

Let's Go!:piscadela:

 

1> Inicie um projeto, crie um novo TFrame, indo em:

File>New>Frame.

Renomeie o frame alterando a propriedade name para "pagina".

 

Agora no form principal, faça estes passos:

Clique 2 vezes no form para gerar a procedure FormCreate, e adicione o seguinte código e deixando como está abaixo:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

Coloque um panel e adicione 2 buttons e mude a caption deles deixando: "Add aba" e "Fechar aba".Mude a propriedade align do panel para alTop.

Coloque apenas um TPageControl que fica na aba Win32, e renomeie ele para "abas".Mude a propriedade align deste pagecontrol para alClient.

 

Agora, vamos ao TFrame.

Coloque um panel e adicione 4 buttons e mude a caption deles deixando: "Ir", "Voltar", "Parar", "Navegar".Coloque tambem um edit, e mude a propriedade align do panel para alTop.

Coloque o componente TEmbeddedWB que você baixou e renomei-o para "browser", e deixe a propriedade align para alClient.

 

Pronto, agora seu navegador está com o "esqueleto" feito.

 

Agora vamos aos códigos!

 

Códigos do Form principal:

Código do botão "Add aba":

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Código do botão "Fechar aba":

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Códigos do TFrame:

Botão Voltar:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

Botão Ir:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

Botão Parar:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

Botão Navegar:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

E é isso pessoal!

Fuizz!

 

 

---

[[Adm]AnnonymousHacker 0]

Eu nao sei Fazer ainda , Coloque umas Print de como o Navegador ira Ficar .

[DeaD FTW 0]

Fico muito agradecido se alguém me ajudasse a não usar o motor internet explore no VISUAL BASIC, eu ate tentei fazer no Delphi mais sou meio inexperiente.