paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-07 02:02:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazReport: Fix compilation of ZeosDB

Browse Source 
git-svn-id: trunk@65468 -
This commit is contained in:
jesus 2021-07-16 22:11:35 +00:00
parent 22c8c554b1
commit 23b667846d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/lazreport/source/addons/ZeosDB/lr_db_zeos.pas
View File

@ -134,7 +134,7 @@ begin
Result:=nil;
for i:=0 to Count - 1 do
begin
if CompareText(TQueryParam(Items[i]).ParamName), AParamName) = 0 then
if CompareText(TQueryParam(Items[i]).ParamName, AParamName) = 0 then
begin
Result:=TQueryParam(Items[i]);
exit;