~ Le Como fazer um navegador basico ~ Delphi 7 ~ #AnonM4k3r

**M4K3R** Qua maio 09, 2012 11:44 pm

Eaeh Galera Da SD, Hoje Vou Mostrar Um Tutorial De Como Fazer um Navegador Basico.
~~~~~~~~~~~~~~~~~~~~~~~~~~
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 ↓
~ Le Como fazer um navegador basico ~ Delphi 7 ~ #AnonM4k3r 68081368

~ Le Como fazer um navegador basico ~ Delphi 7 ~ #AnonM4k3r 68081368

Renomeie os buttons :

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 ↓
~ Le Como fazer um navegador basico ~ Delphi 7 ~ #AnonM4k3r 37270354

~ Le Como fazer um navegador basico ~ Delphi 7 ~ #AnonM4k3r 37270354

Se está, otimo (:

Agora vamos dar funções aos buttons.

Click duas vezes no button 4 e coloque
Código:

Click duas vezes no button 1 e coloque
Código:

Click duas vezes no button 2 e coloque
Código:

Click duas vezes no button 3 e coloque
Código:

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 :
Código:

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

Créditos:

Spoiler: