[Fehler] URL.pas(32): Inkompatible Typen: 'HKEY' und 'String'

[sx2008]

Das ist aber umständlich. Es reicht doch Folgendes:

Delphi-Quellcode:

function OpenURL(const url: string): Boolean;
begin
   Result := ShellExecute(0, 'open', PChar(url), nil, nil, SW_SHOW) > 32;
end;

// Anwendungsbeispiel
if not OpenURL('http://www.delphipraxis.net') then
  RaiseLastWin32Error;

Noch ein kleiner Hinweis:
Die Funktion OpenURL() kann auch potentiell gefährliche Dinge (Dateien mit Viren) öffnen.
Deshalb ggf. die URL prüfen bevor man sie öffnet.