Удалить тег <div>...</div> Из WebBrowser Delphi.

[Fahman]

Всем доброго времени суток, нужно с Webbrowser'а удалить 1 <div>
с утра по гуглил ни чего путного не нашел, точнее есть 1 пример но он удаляет тег "input" а мне нужно удалить <div>
Не подскажете как сделать?
Вот код для удаления Инпутов

begin
 Document:=WebBrowser1.Document as IHTMLDocument2;
   Collection := Document.all.tags('input') as IHTMLElementCollection;
   for i := 0 to pred(Collection.length) do
   begin
      Element := Collection.Item(i, varEmpty) as IHTMLElement;
      if Assigned(Element) and (Element.id = 'toolbar') then
      begin
         node := Element as IHTMLDOMNode;
         node := node.parentNode.parentNode.parentNode;
         while node.hasChildNodes do node.removeChild(node.firstChild);
         node := node.nextSibling;
         while node.hasChildNodes do node.removeChild(node.firstChild);
      end;
   end;
end;

а мне надо удалить например этот тег

<div class="x-toolbar x-small-editor">....</div>

Вообще не пойму как работать с 'Dom' перепробовал много вариантов все не то, ни как не пойму, хочу вот такой код писать сам самостоятельно а не искать в интернете готовые, чтоб мог понимать какой код и что он делает.....

[eval]

во фрилансе это очень быстро сделают

[Stilet]

Вообще не пойму как работать

Замени input на div в Document.all.tags
И так же измени Element.class = 'x-toolbar x-small-editor' в условии
Это для начала.

А вообще замени работу )
Программирование пока что не твое, без обид.

[Fahman]

Сообщение от Stilet

Замени input на div в Document.all.tags
И так же измени Element.class = 'x-toolbar x-small-editor' в условии
Это для начала.

А вообще замени работу )
Программирование пока что не твое, без обид.

Спасибо, про программирование ни вы 1 говорите уже такое, Ну вот даже и по форексу говорили что не мое... но все же сейчас на много лучше чем по началу... Я раньше не занимался этим вообще.... Скорее всего пойду на платные курсы... Не знаете кто обучает по скайпу ?

Не много терпения и потом у меня будете спрашивать как лучше сделать
Программирование для меня не работа, это хобби, для себя делаю что мне надо и все)

Вот вы говорите о фрилансе, Хорошо, сколько по просят чтоб обучить работать только с webbrowser
то есть чтоб я мог
удалить что мне не нужно с сайта
Запретить какой нибудь javascript
спарсить только нужный div с сайта
ну что то в этом роде...


Stilet
Ваш способ мне не помог((
ставил на "WebBrowser1DocumentComplete" при открытии странички видно тег..

[Stilet]

ставил на "WebBrowser1DocumentComplete" при открытии странички видно тег..

Отладкой проходи по коду. Я бы вообще его переписал:

begin
 Document:=WebBrowser1.Document as IHTMLDocument2;
   Collection := Document.all.tags('div') as IHTMLElementCollection;
   for i := 0 to pred(Collection.length) do
   begin
      Element := Collection.Item(i, varEmpty) as IHTMLElement;
      if Assigned(Element) and (Element.class= 'x-toolbar x-small-editor') then
      begin
         node := Element as IHTMLDOMNode;
         node := node.parentNode.removeChild(node);
      end;
   end;
end;

Еще раз повторяю: Отладка. Сколько бы ты не изучал - ты не Вирт. Поэтому отладкой пользоваться край необходимо научиться. Иначе будешь продолжать задавать такие вопросы, а это к прогрессу не ведет не смотря на общение.

[Человек_Борща]

удалить что мне не нужно с сайта
Запретить какой нибудь javascript
спарсить только нужный div с сайта
ну что то в этом роде...

Первое и последнее делается за минут 5 от силы, ну для меня по крайней мере.
Достаточно почитать про структуру DOM, чуть- разобраться с JavaScript, ибо и программно и там работа с DOM одинакова.

В случае обучения вы платите за потраченное время и ресурсы на вас, все буквально зависит от того как быстро вы все схватываете.

Второе поздно делать в браузере, это другое и делается перед браузером, т.е. пишется фаерволл.

По теме:
Все чуток проще, запрашиваете у документа есть свойство scripts а у него есть метод getElementsByClassName, который делает выборку тегов по аттрибуту class.
Затем проходитесь по коллекции и удаляете узлы.

[Fahman]

Спасибо всем за ответы. Тему можно закрыть. Проблема не решена.

P.S. Проблема не в вас, проблема во мне.....

[eval]

в том что вы читать е хотите, что говорят не слушаете и т.д.

и программирование тут не при чем, возьмите человека с метлой,
если ему говорят что надо брать за черенок и мести метлой, а он все равно в руки метлу а черенком по полу вазюкает, ну и что с него получится?