(Delphi 7)[Source]Criando botão para acessar sites.

[ProExpert 0]

Como tinha tópicos perguntando isso, resolvi criar o tópico, so é existente em respostas mais nunca vi um tópico desse ! Bem vamos lá .

 

CRIANDO DESIGN

 

Adicione dois Buttons.

 

Mude o texto do button1 para : Google

Mude o texto do button2 para : Webcheats

 

Organize do jeito que achar melhor !

 

CÓDIGOS

 

Primeiro , va no code explorer, clique duas vezes no TForm1 e procure as "uses", apague os ";" da última use, coloque uma vírgula e escreva ShellApi , e coloque ";"

 

Agora o código :

 

Button1 (Google)

 

shellexecute(handle,'open','www.google.com.br',nil,nil,sw_shownormal);

 

Button2 (Webcheats)

 

shellexecute(handle,'open','www.webcheats.com.br',nil,nil,sw_shownormal);

 

Se por acaso quiser mudar os sites faça assim :

 

shellexecute(handle,'open','Site Aqui',nil,nil,sw_shownormal);

 

Onde tem Site Aqui , adicione seu site dentro das ' ' :D

 

Att ProExpert

 

Agradeçam se gostaram, não cai o dedo :risada:

 

OBS : Não coloquei prints , pois, quando upo no Imageshack, fica pequena... Me ajudem como upa por favor ! (Agradeço desde já)

[Lf' 7]

o tópico está bom, foi bem explicado e dá pra entender, mas com prints ficária melhor.

upe as imagens no

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

• Entre
• ou
• Cadastre-se

valew por compartilhar!

[Zaum 39]

Mano por acaso ja existe um tópico assim, sobre ShellExecute do oinetooi VEJA tem ateh na quick list

[Mr.Doctor 0]

Amigo Já Existe Um Tutorial Sobre executação De Site Sobre um Button.

Inclusive Um Tutorial Sobre o Shellexecute Completo.

Mais Valeu a Tentativa.

[Hero 8]

Caro ProExpert ,

No fórum, recebemos uma grande quantidade de posts diariamente.

 

Antes de postar um conteúdo, utilize a ferramenta pesquisar, e veja se alguém já o postou antes.

 

Caso já exista,não crie o tópico.

Ajude a manter a WebCheats organizada e limpa.

 

Qualquer dúvida sobre as regras gerais do fórum, leia:

 

 

• Regras WebCheats
  

 

 

 

Tópico Trancado