Código Delphi [-]procedure TForm1.Button2Click(Sender: TObject); begin ShellExecute(self.handle, 'open', 'http://www.clubdelphi.com', nil, nil, SW_SHOWNORMAL); end;
procedure TForm1.Button2Click(Sender: TObject); begin ShellExecute(self.handle, 'open', 'http://www.clubdelphi.com', nil, nil, SW_SHOWNORMAL); end;