Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.26;
Скачать: CL | DM;

Вниз

TWebBrowser   Найти похожие ветки 

 
Danger ©   (2003-03-29 17:11) [0]

При написании програмы я столкнулся с такой проблемой - надо загрузить в веббраузер определенную вебстраницу, на ней найти кусок текста и направить его в обьект мемо. Но тут возникла такая трабла - как можно в веббраузере организовать поиск текста?? На худой конец можно попробовать сохранить его содержимое в текстовый файл и там уже искать обычными методами, но тут встает другая проблема, как это можно сохранить без участия юзера?? Буду благодарен за любой совет...


 
ALaKO   (2003-03-29 18:25) [1]

var
Document: IHTMLDocument2;
V: OleVariant;
begin
Document := Webbrowser1.Document as IHtmlDocument2;
if Document <> nil then
Memo1.Text := (Document.all.Item(NULL, 0) as IHTMLElement).OuterHTML;

end;

uses ...MSHTML, ActiveX


 
ALaKO   (2003-03-29 18:26) [2]

Передать обратно:

var
Document: IHTMLDocument2;
V: OleVariant;
begin

Document := WebBrowser1.Document as IHtmlDocument2;
V := VarArrayCreate([0, 0], varVariant);
V[0] := Memo1.Text;
Document.Write(PSafeArray(TVarData(v).VArray));
Document.Close;


 
Danger ©   (2003-03-29 18:42) [3]

Все работает, спасибо :))



Страницы: 1 вся ветка

Текущий архив: 2003.05.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.016 c
4-83808
GrBob
2003-03-26 19:39
2003.05.26
Поиск объекта


14-83676
zhenya
2003-05-04 20:39
2003.05.26
Как удолить файл с неизвестным расшерением?


3-83344
Seven
2003-05-05 06:54
2003.05.26
Upper в Interbase


9-83311
Ev_genus
2002-12-15 22:44
2003.05.26
Проекция.


4-83792
Programmer1
2003-03-26 17:29
2003.05.26
Вызов функции PlaySound