Link?

Question

Esta deve ser muito f�cil... Eu quero saber como eu coloco um link direto para um site na internet, dentro de um programa desenvolvido em Delphi. A pessoa clica na imagem, endere�o ou uma palavra e isto abre o endere�o que eu quero, tipow, http://www.globo.com/programadojo.
Valew

Anonymous · Answer

1� Declare o procedure na se��o PUBLIC da unit.

[color=indigo:06cd79f654]procedure JumpTo(const aAdress: String);[/color:06cd79f654]

2� Coloque a cl�usula [color=darkblue:06cd79f654]ShellAPI[/color:06cd79f654] na uses no in�cio da unit.

[b:06cd79f654]procedure TForm1.JumpTo(const aAdress: String);
var
buffer: String;
begin
buffer := �http://� + aAdress;
ShellExecute(Application.Handle, nil, PChar(buffer), nil, nil, SW_SHOWNORMAL);
end;
procedure TForm1.Label1Click(Sender: TObject);
begin
JumpTo(�http://www.globo.com/programadojo. �);
end;[/b:06cd79f654]

falow cara

Fernando Souza
Votorantim/SP