Tutorial - Como fazer um navegador basico ~ Delphi 7 ~

[~Vinni.Slayer 0]

Iaew galera, vi postar um tutorial aqui a vocês que nunca vi aqui na WC, que é fazer um Navegador basico no Delphi. Bom chega de conversa e vamos ao trabalho .

 

Adicione um Painel, na aba Standard. Vá na propriedade Align, e mude para : Altop.

Apague o Caption do Painel.

Depois adicione um Edit, aba Standard, Apague Text do[e] Edit[/b] .

Adicione mais 4 buttons ( aba Standard ) .

Organize-os desta forma ↓

Renomeie os buttons :

Button 1 - <

Button 2 - >

Button 3 - Atualizar

Button 4 - Ir

Vamos agora colocar, a parte do Browser.

Vá na aba Internet, e adicione WebBrowser, o ultimo . Vá na propriedade Align, e mude para AlClient. Mude o name dele para - web .

Confira se está assim ↓

Se está, otimo (:

Agora vamos dar funções aos buttons.

Click duas vezes no button 4 e coloque

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

• Entre
• ou
• Cadastre-se

Click duas vezes no button 1 e coloque

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

• Entre
• ou
• Cadastre-se

Click duas vezes no button 2 e coloque

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

• Entre
• ou
• Cadastre-se

Click duas vezes no button 3 e coloque

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

• Entre
• ou
• Cadastre-se

Pronto, ja fez tudo isso, agora vamos colocar a pagina inicial.

Clique no Form1 lá do lado . Mude de properties para events. Depois de ter feito isso, procure a opção OnShow, e dê dois cliques nela, e adicione isso :

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

• Entre
• ou
• Cadastre-se

Pronto, e é só isso, se quiser dar um design pode fazer que não vai interferir em nada (:

Vaaleu !

[ShadowWork 0]

Adorei!!!Mais prefiro meu googlw Chrome mesmo :D,cara tem como mudar á Interface?

[Cash Override 0]

Amigo esse é o básico dos básicos

mais ficou ótimo para os iniciantes !

[~Vinni.Slayer 0]

Valeu caras :D