TWebBrowser < undefinierter Bezeichner

[endeffects]

naja eigentlich wollte ich damit nix pushen,
fehlt auch irgendwie die hälfte bei dem posting

ich hatte das ganze nun wie folgt ausprobiert, aber
ich häng noch immer an der selben stelle

Delphi-Quellcode:

unit Unit1;

interface 

uses 
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 
  Dialogs, ShDocVw, StdCtrls, activex;

type 
  TForm1 = class(TForm) 
    Button1: TButton; 
    procedure Button1Click(Sender: TObject); 
  private 
    { Private-Deklarationen } 
  public 
    { Public-Deklarationen } 
  end; 

var 
  Form1: TForm1; 

implementation 

{$R *.dfm} 

procedure TForm1.Button1Click(Sender: TObject);
var wb: TWebBrowser;
begin
  wb := TWebBrowser.Create(Form1);
  TWinControl(wb).Name := 'MyWebBrowser';
  TWinControl(wb).Parent := Form1;
  wb.Align := alClient;
  wb.Navigate('http://www.google.com');
  sleep(2000);
  wb.OleObject.document.forms.item(0).elements.item('q').value:='test';

  end;

end.