Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Преобразование HTML в текст


KoluChi ©   (2002-11-25 13:42:00) 

Нужно получить текст HTML странички, как если бы в IE была выполнена команда Сохранить как->Текстовый документ.


KoluChi   (2002-11-29 16:41:00) [1]

Большое спасибо, я уж думал никто не знает.


int64   (2002-11-26 11:26:00) [2]

procedure TForm1.Button1Click(Sender: TObject);
var IE: IWebBrowser2;
v: OleVariant;
begin
IE := CreateOleObject("InternetExplorer.Application") as IWebBrowser2;
IE.Navigate("c:\temp\1.htm", v, v, v, v);
while IE.ReadyState<>READYSTATE_COMPLETE do
Application.ProcessMessages;
Memo1.Text:= Variant(IE.Document).body.innerText;
IE.Quit;
end;


KoluChi   (2002-11-25 17:20:00) [3]

???


KoluChi   (2002-11-25 16:29:00) [4]

??


KoluChi   (2002-11-25 15:56:00) [5]

?


KoluChi   (2002-11-25 15:09:00) [6]

Может с помощью IHTMLDOCUMENT?


KoluChi   (2002-11-25 14:24:00) [7]

Пробовал, не удобно. Например, если в тексте есть <,> или в JavaScript.


Reindeer Moss Eater   (2002-11-25 14:09:00) [8]

Вырезай все, что находится межу парными <>


KoluChi   (2002-11-25 14:08:00) [9]

?


Наверх

Титульная страница Поиск, карта сайта Написать письмо