Fixed the OutOfBounds issue with CC

Villavu · Sep 14, 2014 · cbe2312 · cbe2312
1 parent 9664e12
commit cbe2312
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Units/Misc/v_autocompleteform.pas b/Units/Misc/v_autocompleteform.pas
@@ -222,7 +222,7 @@ procedure TAutoCompleteListBox.setFilter(Filter: string);
           Items.Append(fList[i]);
 
           if (LowerCase(fInsertList[i]) = fFilter) then
-            ItemIndex := i;
+            ItemIndex := c;
 
           fIndexList[c] := i;
           Inc(c);