Судя по коду Вы хотите вывести результат в StringGrid2. Во-первых, у Вас не определено исходное состояние этого грида - есть в нём что-то или нет. Я бы его для начала очистил. Далее поменяйте строчки местами - сначала увеличивайте количество строк, а затем только пишите в новую строку содержимое. Сейчас не могу проверить, но по-моему, обращение по несуществующему номеру строки ошибки не вызывает, но и практического результата не даёт, что у Вас скорее всего и происходит.
Ну и то, что написано, не совсем отражает задачу. Вы пишете о поиске по первой цифре, а проверяете на равенство строк. Возможно Вы это ещё просто не сделали.