Como Abrir um Link?

12/05/2003

1

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?


Responder

Posts

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);


Responder

12/05/2003

Aroldo Zanela

Colega,

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;



Responder

12/05/2003

Aroldo Zanela

Colega,

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;



Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira