12.05.2010, 13:55
|
|
Участник форума
Регистрация: 20.12.2008
Сообщений: 277
С нами:
9152955
Репутация:
84
|
|
парсит только первый ник, а не все что есть на странице.
RegExp := TRegExpr.Create;
RegExp.Expression := '/users/(.+?)/';
if RegExp.Exec(Sob) then
repeat
Form1.Memo5.Lines.Add(RegExp.Match[1]);
until not RegExp.ExecNext;
|
|
|