(delphi) генерация

Есть запрос s:=idhttp1.Get('http://link.ru/22224'); после него идет парсинг текст , так вот нужно что после нажатия бутонна цифры менялись ну типо генерации или как это назвать , напишите реализацию суда

 

Code:

for x := старт to стоп do
begin
  s:=idhttp1.Get('http://link.ru/'+inttostr(x));
************
end;

 

Ок , а как таймер прикрутить что каждую секунды он обналял линк и +1 делал ?

 

В глобальные переменные запиши:

Code:

var
i: Integer;

Code:

procedure TForm4.FormCreate(Sender: TObject);  
begin  
i := 0; 
 end;

Code:

procedure 
TForm4.Timer1Timer(Sender: TObject);
var  
s: string;  
 begin  
 inc(i);   
s:= IDHTTP1.Get('http://link.ru/'+IntToStr(i)); 
 end;