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

Вниз

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

 
ANSH ©   (2005-12-16 22:56) [0]

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


 
Fay ©   (2005-12-17 02:59) [1]

Как html-текст?


 
ANSH ©   (2005-12-17 19:30) [2]

да как текст


 
ANSH ©   (2005-12-17 19:32) [3]

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


 
ANSH ©   (2005-12-17 19:45) [4]

я пользуюсь 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 20:07) [5]

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


 
ANSH ©   (2005-12-18 01:32) [6]

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



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

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

Наверх




Память: 0.48 MB
Время: 0.043 c
1-1140179067
rolex
2006-02-17 15:24
2006.04.02
Как сделать нерабочими CheckBox ы и Header в ListView?


15-1142354254
TListBox
2006-03-14 19:37
2006.04.02
Не грузится Win2000 после замены видеокарты.


2-1142507523
integery
2006-03-16 14:12
2006.04.02
знаки ???????????? вместо надписей


2-1142845504
Dust
2006-03-20 12:05
2006.04.02
опять Access vialation......................... :(


1-1140966751
Конопелька
2006-02-26 18:12
2006.04.02
Выделение области для перетаскивания формы.