Endereço de e-mail / url na aplicação.

{Estes examplos utilizam uma API do Windows muito popular, a shellexecute, por isso não se esqueça de colocar a ShellApi unit no uses clause da sua unit.
URL(endereço da internet)}
procedure TForm1.Label1Click(Sender: TObject);
begin
ShellExecute(Handle,'open','http://www.bytesul.com.br',nil,nil,SW_SHOW);
end;
// e-mail
procedure TForm1.Label2Click(Sender: TObject);
begin
ShellExecute(Handle,'open','mailto:melo@bytesul.com.br',nil,nil,SW_SHOW);
end;