InternetExplorer OLE

[Daniel B]

mal schnell und hässlich

Delphi-Quellcode:

procedure ieopen;
var
  ieo : olevariant;
begin
  ieo := CreateOleObject('InternetExplorer.Application');
  ieo.visible := true;
  //hier rest
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
ieopen;
end;

ups, ne url bruachst auch noch:

Delphi-Quellcode:

procedure ieopen;
var
  ieo : olevariant;
begin
  ieo := CreateOleObject('InternetExplorer.Application');
  ieo.visible := true;
  //hier rest
  ieo.navigate('http://bmw.de');
end;