procedure TForm1.CrtNew;
begin
Browser := TWebBrowser.Create(Self);
TWinControl(Browser).Parent := Self;
Browser.Left := 88;
Browser.Top := 8;
Browser.Width := ClientWidth - 96;
Browser.Height := ClientHeight - 16;
Browser.Navigate(FileName);
end;
关于TWebBrowser.Document内存泄露问题: http://hi.baidu.com/allen%5F086/blog/item/7a268c022de949e109fa9308.html
如何动态创建WebBrowser: http://topic.csdn.net/t/20030116/15/1365092.html
过了N过岁月之后,动手操作,忘记了,照上面的代码写,还是没有显示出来;最后关键句:Browser.ParentWindow:=Form1.Handle;这句要放在最后,不然创建的WebBrowser不能调整大小。