Удивленный Цезарь

[konfeta5]

Пытаюсь зашифровать текст по Цезарю (делфи 7).
Много дней бьюсь над проблемой - не могу найти ошибку - при зашифровке на выходе в обработанном тексте выдаются через раз лишние символы.
Прикладываю во вложенном файле "пациента".

Для примера возьмем данные.
Пусть Исходный текст: "абвгдеёжзик abcdefghi".
Нажимаю кнопку "Зашифровать", указываю ключ в edit1 равным 1. И обработанный текст выдается по-разному.
Нажал 1 раз: БВГДЕЁЖЗИЙЛBCDEFGHIJ (нормально зашифровалось)

БВГДFЕЁЖЗИЙЛBCDEFGHIJ (лишняя - F между Д и Е и одной нет)
БВГДFЕЁЖЗИЙDЛBCDEFGHIJ (лишняя - F и (третья Н справа)
БВГДFЕЁЖЗИЙЛBCDEFGHIHJ (лишняя - вторая H справа)
БВГДFЕЁЖЗИЙЛBCDEFGHIDJ (лишняя - вторая D справа)

Если менять ключ или разбавлять пробелами исходный текст, будет добавляться лишняя (-ие) буква (-ы) английского алфавита.