Создать TWebBrowser во время выполнения программы
Оформил: DeeCo
Автор: http://www.swissdelphicenter.ch
procedure TForm1.Button1Click(Sender: TObject); var wb: TWebBrowser; begin wb := TWebBrowser.Create(Form1); TWinControl(wb).Name := 'MyWebBrowser'; TWinControl(wb).Parent := Form1; wb.Align := alClient; // TWinControl(wb).Parent := TabSheet1; ( To put it on a TabSheet ) wb.Navigate('http://www.swissdelphicenter.ch'); end;
Далее: Сохранить все картинки TWebBrowser »»