// Wer die Komponente "TWebBrowser" nicht in seiner Delphi-Version vorfindet,
// kann das über den AktiveX-Import nachholen:
 
{ 
 1. "Komponente" anklicken 
 2. "AktiveX importieren" anklicken 
 3. "Microsoft Internet Controls" suchen und anklicken 
 4. "Installieren" anklicken 
 5. "Neues Package" anklicken 
 6. Dateiname: d:\progra~1\borland\delphi4\Lib\webbrowser.dpk  // z.B. 
 7. Beschreibung: TWebBrowser 
 8. "Ja" anklicken 
 9. Pallete "AktiveX" anklicken 
10. "Webbrowser" auf die Form ziehen 
} 
 
// Seite anzeigen 
 
procedure TForm1.Button1Click(Sender: TObject); 
var 
  Param: OleVariant; 
begin 
  WebBrowser1.Navigate('http://www.dbrsoftware.de/delphi', Param, Param, 
    Param, Param); 
end; 
 
// Seite zurück 
 
procedure TForm1.Button2Click(Sender: TObject); 
begin 
  try 
    WebBrowser1.GoBack; 
  except 
  end; 
end; 
 
// Seite vor 
 
procedure TForm1.Button4Click(Sender: TObject); 
begin 
  try 
    WebBrowser1.GoForward; 
  except 
  end; 
end; 
 
// Aktion abbrechen 
 
procedure TForm1.Button5Click(Sender: TObject); 
begin 
  WebBrowser1.Stop; 
end; 
 
// Seite neu laden 
 
procedure TForm1.Button6Click(Sender: TObject); 
begin 
  try 
    Webbrowser1.Refresh; 
  except 
  end; 
end;