[Rokuell]

>ART
Работает медленно, т.к у тебя в алгоритме идёт построчное считывание и => функция Pos вызывается столько раз, сколько строк в файле!
В данном случае читать файл надо одной строкой и искать лишь один раз вызвав Pos