Показать сообщение отдельно
  #2  
Старый 31.10.2016, 01:07
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,100
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Удаляет не при расшифровке, а при шифровании.
Надо в алфавит соотв функции добавить пробел:
Код:
function Cesar_Crypt(s: string): string;
const
  SizeA = 34; 
  RusA = 'абвгдеёжзийклмнопрстуфхцчшщъыьэюя ';
Ответить с цитированием