Ich hab das Problem jetzt gelöst, durch Zusatz von RegExpr.
Delphi-Quellcode:
RE := TRegExpr.Create;
...
RE.Expression := '([0-9]*)';
expression := RE.Replace(expression, '$1.', True);
expression := StringReplace(expression, '..', '.', [rfReplaceAll]);
...
RE.Free;
Weiß zwar nicht, wieso da dann 3.. und nicht 3. stand, aber hauptsache es funktioniert.