Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=405103&view=findpost&p=3617526 Mon, 10 Aug 2015 08:09:27 +0000 Простой парсер, не могу получить href из html (DOM) https://forum.sources.ru/index.php?showtopic=405103&view=findpost&p=3617526
Добавлено
Filka, типичный пример ответа на сорсах.
ТС: - Помогите найти ошибку в применении класса X
Отв: - Выкинь класс X, бери класс Y, правда, он устроен совершенно по-другому, не обновлялся аж с 2007 года, содержит 0 документации, но ты же программист и не боишься трудностей, правда?]]> Fr0sT Delphi: Сетевое программирование https://forum.sources.ru/index.php?showtopic=405103&view=findpost&p=3617334 Sat, 08 Aug 2015 15:58:13 +0000 Простой парсер, не могу получить href из html (DOM) https://forum.sources.ru/index.php?showtopic=405103&view=findpost&p=3617334 https://code.google.com/p/powtils/downloads...07.zip&can=2&q=]]> Filka Delphi: Сетевое программирование https://forum.sources.ru/index.php?showtopic=405103&view=findpost&p=3617327 Sat, 08 Aug 2015 14:18:44 +0000 Простой парсер, не могу получить href из html (DOM) https://forum.sources.ru/index.php?showtopic=405103&view=findpost&p=3617327 Выдергивает все что Li, потом внутри в h3, а потом в A.

            vTags := WebBrowser1.OleObject.Document.getElementsByTagName('Li');
            n1:=vTags.Length;
     
            if n1>0 then
            begin
     
              for i1:=0 to n1-1 do
              begin
              vTags1 := vTags.item(i1).getElementsByTagName('H3');
              n2:=vTags1.Length;
     
                if n2>0 then
                begin
     
                  for i2:=0 to n2-1 do
                  begin
                  sMemo2.Lines.Add(vTags1.item(i2).InnerHTML);
                  end;
     
                end;
     
              end;
     
            end;


В sMemo2 получается:
    <A href="http://www.google.ru/url?url=http://www.elle.ru/tests/&rct=j&frm=1&q=&esrc=s&sa=U&ved=0CBMQFjAAahUKEwj4n4380ZnHAhWI2SwKHdhEB2A&usg=AFQjCNFKGc7G2o3Ta0OKGyFYhC8EjSKUHg" target=_blank><B>?????</B> ??????: ?????? ??????????????? <B>?????</B> ?????????, ??? <B>...</B></A>


Как получить href? Чето не пойму. Спасибо.]]> strongmaster Delphi: Сетевое программирование