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

Merge branch 'Cody/Dictionary/FixDisplayCount' into 'main'

Browse Source 
Cody/Dictionary: Corrected the exact number of items displayed

See merge request freepascal.org/lazarus/lazarus!502
This commit is contained in:
Maxim Ganetsky 2025-06-24 23:15:50 +03:00
commit 31ce0772fa
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/codetools/ide/codyidentifiersdlg.pas
View File

@ -1131,7 +1131,7 @@ var
if IdentifierPos(FilterP,PChar(Pointer(Item.Name)))<0 then continue; if IdentifierPos(FilterP,PChar(Pointer(Item.Name)))<0 then continue;
end; end;
end; end;
if Found>MaxItems then begin if Found>MaxItems+1 then begin
inc(Found); // only count, do not check inc(Found); // only count, do not check
continue; continue;
end; end;
@ -1186,7 +1186,7 @@ var
end; end;
if FileExistsCached(Item.DUnit.Filename) then begin if FileExistsCached(Item.DUnit.Filename) then begin
inc(Found); inc(Found);
if Found<MaxItems then begin if Found<=MaxItems then begin
FItems.Add(TCodyIdentifier.Create(Item.Name, FItems.Add(TCodyIdentifier.Create(Item.Name,
Item.DUnit.Name,Item.DUnit.Filename, Item.DUnit.Name,Item.DUnit.Filename,
Group.Name,Group.Filename,AddExactMatches)); Group.Name,Group.Filename,AddExactMatches));