diff --git a/packages/rtl/sysutils.pas b/packages/rtl/sysutils.pas
index 152e00a..73ffd41 100644
--- a/packages/rtl/sysutils.pas
+++ b/packages/rtl/sysutils.pas
@@ -2756,7 +2756,7 @@ begin
 end;
 
 Const
-  RESpecials = '([\$\+\[\]\(\)\\\.\*\^])';
+  RESpecials = '([\$\+\[\]\(\)\\\.\*\^\?])';
 
 function StringReplace(aOriginal, aSearch, aReplace: string;
   Flags: TStringReplaceFlags): String;