Страница 1 из 11
Форум о социальных сетях » Общаемся » Болталка » Подскажите пример парсинга страницы? <b> текст </b> ?
Подскажите пример парсинга страницы? <b> текст </b> ?
()Дата: Четверг, 04.07.2013, 09:39 | Сообщение # 1
5 LeveL
Группа: Активный
Сообщений: 171
Награды: 0
Репутация: 42
Замечания: 0%
Статус: Offline
Дайте пример кода, что бы на его основе я смог сделать то что мне нужно.
 
MailGroupCSДата: Пятница, 05.07.2013, 07:12 | Сообщение # 2
3 LeveL
Группа: Активный
Сообщений: 38
Награды: 0
Репутация: 8
Замечания: 0%
Статус: Offline
Вот как то так:

Код
function MyCopy(Text, Tag1, Tag2: string): string;
var
   i1,i2: integer;
begin
   result := '';
   if (pos(Tag1, Text) <> 0) and (pos(Tag2, Text) <> 0) then
     begin
       i1 := pos(Tag1, Text) + length(Tag1);
       i2 := pos(Tag2, Text) - i1;
       if i2 > 0 then
         result := copy(Text,i1,i2);
     end;
end;
 
Форум о социальных сетях » Общаемся » Болталка » Подскажите пример парсинга страницы? <b> текст </b> ?
Страница 1 из 11
Поиск: