[Ferra]

Эта проверка на то, есть ли текущий символ текста в алфавите:

Код:

if pos = 0 then break;

Можешь добавить проверку и на символы ключа.. Или вообще убрать, по сути если символа нет в алфавите - то ничего он не изменит.