TRegExpr: замена несколько раз в строке разными значениями, как?

[trafbite]

Всем привет!
Собственно сабж в теме.

Есть строка вида: "[ааа] [ббб] [ввв] [ггг] [ааа] [еее]", таких строк несколько.

Нужно заменить все вхождения "[ааа]" в строке на какие-либо разные значения, например рандомные цифры.

Делаю так:

    regexp.InputString:=List[i];
    regexp.Expression:='\[ааа\]';
    if RegExp.Exec then
      repeat
        List[i]:=AnsiReplaceStr(List[i],RegExp.Match[0],inttostr(random(100)));
      until not RegExp.ExecNext;
    end;

но в таком случае все вхождения "[ааа]" в строке заменяются на одно и тоже значение, а нужно на разные.

Помогите!

[Пепел Феникса]

толку тут от регулярки?
тут сам компиль PosEx прописал.

[trafbite]

Сообщение от Пепел Феникса

толку тут от регулярки?
тут сам компиль PosEx прописал.

Дай пример, пожалуйста

[Пепел Феникса]

а даже еще легче:

while Pos('[aaa]',s)>0 do
 s:=ReplaceString(s,'[aaa]',IntToStr(random(100)),[]);

как то так.

[trafbite]

Спасибо, а что значит последнее "[]"?

[Пепел Феникса]

пустое множество.