Como Abrir um Link?
Gostaria de saber como posso abrir um link, quando o programa esta e execuçao: Exemplo: Digitei num Label www.terra.com.br, como abrir o link quando o programa esta em execucao?
Wgm8
Curtidas 0
Respostas
Marcelo Saviski
12/05/2003
Declare ShellAPI na uses
coloque isso no evento onclick do label
ShellExecute(Application.Handle, nil, PChar(´http://www.terra.com.br´), nil, nil, SW_SHOWNORMAL);
coloque isso no evento onclick do label
ShellExecute(Application.Handle, nil, PChar(´http://www.terra.com.br´), nil, nil, SW_SHOWNORMAL);
GOSTEI 0
Aroldo Zanela
12/05/2003
Colega,
Coloque ShellAPI na lista de uses e siga o exemplo:
Coloque ShellAPI na lista de uses e siga o exemplo:
procedure TfrmMain.Label1Click(Sender: TObject); begin ShellExecute(Application.Handle, nil, PChar(´http://forumweb.com.br´), nil, nil, SW_SHOWNORMAL); end;
GOSTEI 0
Aroldo Zanela
12/05/2003
Colega,
Coloque ShellAPI na lista de uses e siga o exemplo:
Coloque ShellAPI na lista de uses e siga o exemplo:
procedure TfrmMain.Label1Click(Sender: TObject); begin ShellExecute(Application.Handle, nil, PChar(´http://www.forumweb.com.br´), nil, nil, SW_SHOWNORMAL); end;
GOSTEI 0