Pārlūkot izejas kodu

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

Michaël Van Canneyt 1 gadu atpakaļ
vecāks
revīzija
ac76071d00
1 mainītis faili ar 1 papildinājumiem un 0 dzēšanām
  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');