Вобщем проблема опять...

[FleXik]

Первая страница поиска (всего страниц 15, т.е 1 из 15):

<a href="параметры/p-1/">2</a>     // вторая страница
<a href="параметры/p-2/">3</a>
<a href="параметры/p-3/">4</a>
<a href="параметры/p-4/">5</a>
<a href="параметры/p-5/">6</a>
<a href="параметры/p-6/">7</a>
<a href="параметры/p-7/">8</a>
<a href="параметры/p-8/">9</a>
<a href="параметры/p-9/">10</a>
<a href="параметры/p-10/">...</a>

Последняя страница поиска (всего страниц 15, т.е 15 из 15):

<a href="параметры/p-9/">...</a>
<a href="параметры/p-10/">11</a>
<a href="параметры/p-11/">12</a>
<a href="параметры/p-12/">13</a>
<a href="параметры/p-13/">14</a>
<a href="параметры/p-14/">15</a>     // пятнадцатая страница

вот так выглядят ссылки на следующие страницы, там где "параметры" - параметры для запроса на следующую страницу (убрал т.к все параметры везде одинаковые)

doktor255, всю ночь не спал, думал как решить эту "задачу", голова уже не варит, поэтому, пожалуйста, обьясни о чем ты

[doktor255]

var b: bool;
i: integer;
s: string;
begin
b:= false;
i:= 1;
while b := false do begin
s:= IdHttp1.Get('http://..параметры/p-' + IntToStr(i) + '/');
inc(i);
if pos('параметры/p-' + IntToStr(i + 1) + '/', s) = 0 then b := true //если в полученных данных нет ссылки на следующую страницу, значит 
страница последняя. Переключаем буллеон выхода из цикла
end;

[FleXik]

doktor255, спасибо большое! сразу видно - профи!

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

doktor255, все работает!! спасибо!!!

[doktor255]

Ерунда. Обращайся.
P.S. Но я так и не понял, о чём вы тут три страницы переписывались...