Tad, а чего же не спрашиваешь, почему TStrList.IndexOf не находит пустые строки
Любознательный ты наш ...

Проверочку-то на пустую строку в схеме -- ПОСТАВИЛ