Tips (1541)
uses ShellApi; {....} procedure TForm1.Button1Click(Sender: TObject); begin ShellExecute(Handle, 'open', 'http://www.SwissDelphiCenter.ch', nil, nil, SW_SHOW); end;
Rate this tip: