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

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

получить html-код как текст в файл


ANSH ©   (2005-12-16 22:56:00) 

Всем привет. Помогите, плиз. Как получить html-код какой-либо электронной страницы с Инета в файл как текст?


ANSH   (2005-12-18 01:32:00) [1]

всё, разобрался - в uses нужно добавить MSHTML .


ANSH   (2005-12-17 20:07:00) [2]

может какие-то библиотеки нужно подключить, если  да - то какие?


ANSH   (2005-12-17 19:45:00) [3]

я пользуюсь Delphi7. Как я понял, нужно пользоваться TIdHttp,  только в help-e разобраться не могу. Пишу код:
     
Memo1.Lines.Text:=IdHTTP1.Get('url');   - не катит.

А если -
procedure TForm1.GetHtmlCode(WebBrowser: TWebBrowser; FileName: string);
var
Document: IHTMLDocument2;
PersistFile: IPersistFile;
begin
Document := WebBrowser.Document as IHtmlDocument2;
PersistFile := Document as IPersistFile;
PersistFile.save(StringToOleStr(FileName), true);
if Document <>  nil then
 form1.Memo1.Text := (Document.all.Item(NULL, 0) as IHTMLElement).outerText; //как текст
 form1.Memo2.Text := (Document.all.Item(NULL, 0) as IHTMLElement).outerHTML; //как html
end;
            -  то выдает ошибку, что типа IHTMLDocument2 - нет.
                что делать в этом случае, подскажите пожалуйста!!!!


ANSH   (2005-12-17 19:32:00) [4]

в файл или в, например, TMemo - чтобы можно было потом для этого html-кода написать обработчик


ANSH   (2005-12-17 19:30:00) [5]

да как текст


Fay   (2005-12-17 02:59:00) [6]

Как html-текст?


Наверх

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