Und wie schaut's damit aus?
Delphi-Quellcode:
function OpenURL(
const url:
string): Boolean;
begin
Result := ShellExecute(0, '
open', PChar(
url),
nil,
nil, SW_SHOW) > 32;
end;
....
if not OpenURL('
http://www.delphipraxis.net')
then
Raiselastwin32Error;
Windows verwendet hier natürlich den Standardbrowser; das dürfte auf deinem Rechner Chrome sein.