PHP: procedure TForm1.sButton1Click(Sender: TObject); var //RegExp : TRegExpr; rev, url:string; head: array[1..100] of string; begin while sMemo1.Lines.Count-1 < 10 do begin randomize; rev:=send('GET', Form1.sEdit1.Text,'','','','application/x-www-form-urlencoded;','','','','','',head); url:=parser(rev,'<h2><a href="', '">',0,0); Form1.sMemo1.Lines.Add(url); end; end; Проблема в том что если парсю 10 ссылок то они все одинаковые (то есть парсится первая ссылка и не переходит к второй), мне же надо чтобы ссылки были разные. Код <h2><a href= везде одинаковый, в этом и проблема. Знакомый подсказал что надо через RegExp, но никогда ранее с этим компонентом не работал, помогите пожалуйста.
В приведенном коде ссылки всегда будут одинаковые, т.к. запрос GET в цикле отправляется один и тот же.
Как тогда сделать чтобы разные парсило, а не одну и ту же? Дело в том что GET отправляю на главную сайта, с главной и парсю все ссылки на новости.