Сделать из компонента TWebBrowser и формы .DLL

← →
Pcrepair © (2012-03-10 18:07) [0]

Добрый день!
есть код модуля на базе компонента TWebBrowser. модулю передается параметр в виде URL, модуль выдает строковый массив данных (ХТМЛ-код страницы) и флаг об окончании загрузки
var Form1: TForm1; UrlSearch : String; //входные параметры DataOut : String; //выходные параметры Flag1 : boolean; //окончание загрузки страницы implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); begin Flag1 := False; end; procedure TForm1.Timer1Timer(Sender: TObject); var Flags, TargetFrameName, PostData, Headers: Olevariant; begin if UrlSearch <> "" then begin Timer1.Enabled := False; Flag1 := False; URL1 := UrlSearch; Flags := 0; TargetFrameName := 0; Postdata := 0; Headers := 0; WebBrowser1.Navigate(UrlSearch, Flags, TargetFrameName, PostData, Headers); repeat Application.ProcessMessages; until WebBrowser1.ReadyState >= READYSTATE_COMPLETE; if WebBrowser1.Document <> nil then DataOut := (WebBrowser1.Document as IHTMLDocument2).body.innerhtml; Application.ProcessMessages; begin T := TStringList.Create;//это в другом модуле T.Text := DataOut; //вызов процедур обработки кода. в отдельном модуле end; Flag1 := True; UrlSearch := ""; URL1 := ""; Timer1.Enabled := True; end; end; initialization Set8087CW($133F); end.
Вопрос программистам, хорошо знающим компонент TWebBrowser:
1. можно ли сделать все выше перечисленное в виде DLL, учитывая наличие формы и то что сам TWebBrowser вызывает DLL из ОС
2. будет ли все это работать стабильно, или есть косяки

← →
Сергей М. © (2012-03-10 18:17) [1]

> модуль выдает строковый массив данных

А браузер-то тогда зачем ?)
Не жирно ли задействовать его только лишь для получения кода html-страницы ?

> будет ли все это работать стабильно

Это как звезды расположатся.

> или есть косяки

Да практически за каждым углом грабли ждут)

← →
Германн © (2012-03-10 22:20) [2]

> Вопрос программистам, хорошо знающим компонент TWebBrowser

Опять? И опять на четырех форумах параллельно.

← →
KilkennyCat © (2012-03-11 01:18) [3]

> Германн © (10.03.12 22:20) [2]

> Опять?

а ты хотел, чтоб на весь интернет был один ответ? а гугл тогда как жить будет?

> Вопрос программистам, хорошо знающим компонент TWebBrowser:

а остальные? гуляют лесом?)

Сделать из компонента TWebBrowser и формы .DLL Найти похожие ветки