Webbrowser(IE) for Lazarus Demo

[alaa123456789]

Code: Pascal  [Select][+][-]

1. Uses Windows, Comobj;
2.  
3. procedure TForm1.Button1Click(Sender: TObject);
4. var browser: olevariant;
5. begin
6.  browser := CreateOleObject('InternetExplorer.Application');
7.  windows.setparent(browser.hwnd, form1.handle); // you can use panel1.handle, etc..
8.  browser.toolbar:=false;
9.  browser.fullscreen:=true;
10.  browser.Resizable:=false;
11.  browser.visible:=true;
12.  Browser.Navigate('http://www.lazarus.freepascal.org/');
13. end;

hi
   i added it to panel , then when i write on edit box new website address and press go , it doesn't open in the same window it open normal explorer
what is the solution?