Dynamiczne tworzenie webbrowser i zdarzenie

Witam
Mam mały problem z zdarzeniem w dynamicznie stworzonym komponencie webbrowser.
może podam mój kod:

var
  Form1 : TForm1;  
  aktualizacjaweb : TWebBrowser;
...
Procedure TForm1.aktualizacjaClick(ASender: TObject;
      const pDisp: IDispatch; var URL: OleVariant);
begin
  ShowMessage('TEST');
end;
...
   aktualizacjaweb := TWebBrowser.Create(Form1);
      with aktualizacjaweb do
        Begin
        top :=200;
        left := 200;
        width := 500;
        height := 500;
        visible := true;
        OnDocumentComplete := aktualizacjaClick;
        End;
    aktualizacjaweb.Navigate('http://onet.pl');

i sprawa jest taka ze po załadowaniu strony powinien się wyświetlić komunikat... no ale niestety się nie wyświetla... :(
he i jeszcze jedno tego komponentu w ogóle nie widać na oknie...
ale aplikacja coś z neta pobiera po uruchomienia programu natomiast jak skasuje
aktualizacjaweb.Navigate('http://onet.pl'); to nic nie pobiera czyli komponent się stworzył...

wie ktoś o co tu kaman??

przy tworzeniu dodaj:

TWinControl(aktualizacjaweb).Parent := Form1;

Wielkie dzięki działa wszystko jak należy.