Делфи. Как найти нужные теги и записать их в таблицу

[mirotwor777]

Здравствуйте
Создаю бота для поиска работы
Бот ищет нужную мне информацию по вакансиям (Компания, Должность, Зарплата. Адрес). подгруженную на WebBrowser. После того как находит нужную информацию. записывает в таблицу TStringGrid с полями (Компания, Должность, Зарплата. Адрес).

Поля на сайте имеют следующие параметры:

1. Компания - тег <span> class='company-'
2. Должность- тег <h2>, должность находить в теге h2 без стилей, внутри ссылки
3. Зарплата - тег <b>, class='salary-'
4. Адрес - тег <b>, class='address-'

Вопрос: Как найти данные теги с информацией в поле WebBrowser:и как их записать в таблицуTStringGrid .
P.S: Информацию в интернете нашел, но как найденные теги записывать в таблицу. не могу разобраться. Исходник во вложение

[mirotwor777]

Как заполнять StringGrid я разобрался. Ура!

 type
sg_result: TStringGrid;
  var
 i,Col,Row: integer;
 Doc : Variant;
 begin
sg_result.Options:=sg_result.Options+[goEditing]; //http://www.delphi-manual.ru/stringgrid.php
    sg_result.DefaultRowHeight := 24; // высота всех строк (по-умолчанию)

      sg_result.ColWidths[0] := 75;  // ширина первого столбца
      sg_result.ColWidths[1] := 75;
      sg_result.ColWidths[2] := 65;
      sg_result.ColWidths[3] := 120;
      sg_result.ColWidths[4] := 160;
//Создаем заголовки в таблице
       sg_result.Cells[0,0]:='Компания';
       sg_result.Cells[1,0]:='Должность';
       sg_result.Cells[2,0]:='Зарплата';
       sg_result.Cells[3,0]:='Адрес';
       sg_result.Cells[4,0]:='Ссылка на вакансию';

 for Col:=0 to sg_result.ColCount-1  do
  for Row:=1 to sg_result.RowCount-1 do 
begin
     //В таблицу добавляю Edit, а нужно желательно теги
     sg_result.cells[0,Row]:=edit_company.text;
      sg_result.cells[1,Row]:=edit_position.text; 
      sg_result.cells[2,Row]:=edit_salary.text;
end;
    end;

Вопрос: Как найти список тегов(i) в WebBrowserи присвоить им соответствующий столбец?

• Компания - тег <span> class='company-'
• Должность- тег <h2>, должность находить в теге h2 без стилей, внутри ссылки
• Зарплата - тег <b>, class='salary-'
• Адрес - тег <b>, class='address-'