Lancer une URL dans le navigateur par défaut

Uses shellapi;

procedure TForm1.Label1Click(Sender:TObject);
begin
shellexecute(handle,'open','http://www.swissdelphicenter.ch',nil,nil,sw_show);
end;