Delphi - Az Internet Explorer elindítása saját programból

forráskód letöltése
Az Internet Explorer-t elindíthatjuk saját alkalmazásunkból úgy, hogy rögtön egy tetszőleges web helyre irányítjuk azt. Ilyen funkció hasznos lehet például alkalmazásunk névjegyében, ahol a saját, az adott szoftverünkkel kapcsolatos web helyünkre irányíthatjuk a felhasználót.
A megvalósításnak számtalan módja létezik, mi most azt választottuk, hogy létrehozunk egy új példányt az alkalmazásból a CreateOleObject függvény segítségével. Ennek paraméterként a létrehozandó program regisztrált osztály nevét kell megadnunk.
Létrehozás után a programot a felhasználó számára is láthatóvá tesszük a Visible property-jének igazra állításával. Végül a Navigate2 függvény felhasználásával egy tetszőleges URL-t megadva arra a web helyre irányítjuk a böngészőt, amelyikre csak akarjuk.
procedure TForm1.Label1Click(Sender: TObject);
var
  ie: variant;
begin
  ie:=CreateOleObject('InternetExplorer.Application');
  ie.Visible:=true;
  ie.Navigate2('http://www.SoftwareOnline.hu');
end;