Очень быстрый поиск в списке

В файле есть около 1.000.000 строк до 20 символов, для начала я заношу его в TStringList, а потом выполняю поиск определённой строки через функцию IndexOf, но это занимает достаточно много времени, как это всё дело можно ускорить?