ShellExecute liefert ERROR_ACCESS_DENIED

[Amateurprofi]

Mit den unten stehenden Prozeduren will ich einen Beitrag aus Wikipedia anzeigen bzw. in GoogleMaps eine bestimmte Position.
Das funktioniert nur dann problemlos, wenn der Internet Explorer geöffnet ist.
Ist der IE nicht geöffnet gibt ShellExecute als Returncode 5 (ERROR_ACCESS_DENIED) zurück.
Weiß jemand was der Grund für dieses Verhalten, und ob und wie man das beheben kann.

Delphi-Quellcode:

type
   TGeoPos=packed Record
      Latitude:Extended;
      Longitude:Extended;
   end;

PROCEDURE ShowGoogleMaps(GP:TGeoPos);
var S,S1,S2:String;
begin
   S1:=Trim(FloatToStrF(GP.Latitude,ffFixed,6,6));
   S2:=Trim(FloatToStrF(-GP.Longitude,ffFixed,6,6));
   S:='http://maps.google.de/maps?q='+S1+','+S2+'&z=12';
   ShellExecute(0,'open',PWideChar(S),nil,nil,SW_SHOWNORMAL);
end;

PROCEDURE ShowWikipedia(const Term:String);
var S:String;
begin
   S:='https://de.wikipedia.org/wiki/'+Term;
   ShellExecute(0,'open',PWideChar(S),nil,nil,SW_SHOWNORMAL);
end;