uses ShellApi;
procedure TForm1.Button1Click(Sender: TObject);
begin
    ShellExecute(Handle, nil, 'http://www.sandbrooksoftware.com/index.html', nil, nil,SW_SHOWNORMAL);
end;