* Fix bug ID #32403, return type for replace function to support unicode string

git-svn-id: trunk@37853 -

packages/regexpr/src/regexpr.pas

@@ -207,8 +207,7 @@ type
 
  TRegExpr = class;
 
- TRegExprReplaceFunction = function (ARegExpr : TRegExpr): string
-                               of object;
+ TRegExprReplaceFunction = function (ARegExpr : TRegExpr): RegExprString of object;
 
  TRegExpr = class
    private