ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Abrir Html Através de um Botão On Click

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
luizrj
Novato
Novato


Registrado: Quarta-Feira, 26 de Janeiro de 2005
Mensagens: 12

MensagemEnviada: Dom Fev 06, 2005 7:52 pm    Assunto: Abrir Html Através de um Botão On Click Responder com Citação

Amigos
Como faço para abrir um html com o evento on click de um botão?
Obs.: O nome do html será passado pela aplicação;
Grato
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
sh@dow
Mestre
Mestre


Registrado: Domingo, 21 de Março de 2004
Mensagens: 807

MensagemEnviada: Dom Fev 06, 2005 8:06 pm    Assunto: Abrir Html Através de um Botão On Click Responder com Citação

Tente assim:

uses ShellAPI;

procedure TForm1.Button1Click(Sender: TObject);
var buffer: String;
begin
buffer := \'http://\' + Edit1.Text;
ShellExecute(Application.Handle, nil, PChar(buffer), nil, nil, SW_SHOWNORMAL);
end;

_________________
<a>Regras do fórum</a>
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB