[Freez]

Сообщение от <-TzX->

Var
   I:Integer;
   S:string;
Begin
  i:=pos('Nickname',S);
  if i<>0 do
  Begin
       S:=copy(S,i,Length(S));
       i:=pos('flvl',S);
       S:=copy(S,i,Length(S));
       i:=pos('</div>',S);
       S:=copy(S,7,i-7);
   End;
End;

Как вариант можно сделать так. Прошу ногами сильно не пинать, какая первая мысль по поводу прасинга в голову пришла, так и сделал =)

Изначально в переменной S должен быть весь код страницы, после выполнения этого куска, там останится лишь Ник.

Пример рабочй проверял. Работать будет до тех пор пока не изменят структуру сайта. Ну или у человека не будетв нике "</div>" =))

Шикарно, теперь ножно сделать полноценный сборщик данных .

Respect аффтору

Только вот если переменная вся страница, небудет ли сборщик работать слишком медленно.Может как то ограничить переменную до нужной части ,если конечно возможно.