paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-20 11:49:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

fcl-db: do not include <> characters to parameter names. Issue #37142

Browse Source 
git-svn-id: trunk@45494 -
This commit is contained in:
ondrej 2020-05-25 10:40:24 +00:00
parent 362d2b50df
commit 5b3c349911
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fcl-db/src/base/dsparams.inc
View File

@ -389,7 +389,7 @@ begin
else else
begin begin
ParamNameStart:=p; ParamNameStart:=p;
while not (p^ in (SQLDelimiterCharacters+[#0,'=','+','-','*','\','/','[',']','|'])) do while not (p^ in (SQLDelimiterCharacters+[#0,'=','+','-','*','\','/','[',']','|','<','>'])) do
Inc(p); Inc(p);
ParamName:=Copy(ParamNameStart,1,p-ParamNameStart); ParamName:=Copy(ParamNameStart,1,p-ParamNameStart);
end; end;