Просмотр исходного кода

* Take into beginning begin and end of string in LIKE match

Michaël Van Canneyt 1 год назад
Родитель
Сommit
ac76071d00
1 измененных файлов с 1 добавлено и 0 удалено
  1. 1 0
      packages/fcl-base/src/fpexprpars.pas

+ 1 - 0
packages/fcl-base/src/fpexprpars.pas

@@ -3295,6 +3295,7 @@ begin
     S:=TJSString(S).replace(TJSRegexp.new(RESpecials,'g'),'\$1');
     S:=StringReplace(S,'%','(.*)',[rfReplaceAll]);
     S:=StringReplace(S,'_','(.)',[rfReplaceAll]);
+    S:='^'+S+'$';
     try
       // Writeln('Ex: ',FLast,' -> ',S);
       FRE:=TJSRegexp.New(S,'i');