Ну все-таки 250кБайт/сек это не 10
И у меня так поменьше немного, чем 1М/сек
Вопрос скорости исполнения кода (а шифровка здесь - это уже 100% наш код, а не Билла) можно тоже решать...
Скажем прописать всю шифровку Stream-а в одном ИК. А для доступа к данным у Stream-а есть поле Memory...
Random брал только из соображений надежности шифровки, и в Дельфи он безобразно прост, типа:
RandSeed := RandSeed*$08088405 + 1[/code]
Одно целочисленное умножение. Ну и дальше использовать для шифровки только, скажем, его младший байт.
[b]-=Dima=-[/b], попробуй после такого заценить скорость