Tips (1541)

Tip Bewertung (8):

uses
  ShellApi;

{....}

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(Handle,
               'open',
               'http://www.SwissDelphiCenter.ch',
               nil,
               nil,
               SW_SHOW);
end;