Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум программистов _ Delphi - Сети _ Как прочитать построчно Html-код страницы

Автор: Adm 11:01:2008, 07:37

Плз, подскажите чем и как прочитать построчно (да и весь текст целиком - сойдет) html-код страницы с известным адресом. Отображать страницу в браузере при этом не нужно.

Автор: sax_ol 11:01:2008, 07:53

Берите Indy и вперед.

Автор: Adm 11:01:2008, 08:02

А без Indy - никак?
Я с ним не работал никогда...

Автор: sax_ol 11:01:2008, 08:07

С Indy проще, чем без него.

Ну или тотже TWebBrowser, но Visible := false; наверное проще уж некуда. smile.gif

Автор: root 11:01:2008, 08:26

Для: Adm
там ничего сложного

Код
var
    st1: TStream;
  const
    URL: String =
       'http://forum.codeby.net/';
  begin
    --
    st1 := TMemoryStream.Create;
    IdHTTP1.Get(URL, st1);
    st1.Seek(0, soFromBeginning);
    Memo1.Lines.LoadFromStream(st1);
    st1.Free;
end;
ИЛИ
Memo1.Text := IdHTTP1.Get(URL);

Автор: Adm 11:01:2008, 10:59

Спасибо, с этим я управился (как написано в ИЛИ)!

А подскажите еще такую вещь. Как проверить наличие подключения к И-нету? Я обрабатываю построчно текстовик и перед тем, как терзать очередную строку должен убедиться, что нахожусь on-line...

Автор: sax_ol 11:01:2008, 11:05

Цитата(Adm @ 11:01:2008, 12:59 )
Как проверить наличие подключения к И-нету?

Никак. Ловите исключение при загрузке.

Автор: root 11:01:2008, 11:44

Цитата(Adm @ 11:01:2008, 16:59 ) *
должен убедиться, что нахожусь on-line...

можно через пинг реализовать

Автор: sax_ol 11:01:2008, 11:48

Для: root
Это в принципе тоже-самое, да также не достоверная информацияю wink.gif

Автор: Morpheus 11:01:2008, 12:06

Для: root
да уж не каждый на пинг откликнеться

Автор: Barmutik 11:01:2008, 15:30

Google откликнется с вероятностью 99.(9) smile.gif Самый банальный способ проверки есть ли выход в инет..

Автор: dima_lamo 14:01:2008, 14:56

Я у себя так и проверяю когда подазрения есть... но вот когда стоит бешенный фаервол это безполезно
(У меня слчай был, фаер взбесился! Прикинте, он кажду. программу. котороя была в доверенныъх прописал по 700 раз! и когда все их удоляешь, при следующем запуске они снова появлялись!
И плюс к этоку от 60 и до 90 процессов svchost в инет лезло... )

Я не шучу, это реально было! Потом веба установил, у меня там вирусни было...

Русская версия Invision Power Board (http://www.nulled.ws)
© Invision Power Services (http://www.nulled.ws)