[Janom]

Попробуй вместо:

Код:

enCodeCaesarCriptMode(Adoquery1.fieldByName('Наименование_товара').AsString,3,60);
deCodeCaesarCriptMode(Adoquery1.fieldByName('Наименование_товара').AsString,3,60)

Использовать:

Код:

enCodeCaesarCriptMode(Adoquery1.fieldByName('Наименование_товара').AsString,3,17);
deCodeCaesarCriptMode(Adoquery1.fieldByName('Наименование_товара').AsString,3,17)

Ну вообщем ограничение уменьшить... код шифратора на скорую руку набросал так что может переодически глючить....