Епрст, что мешает, зная открытый текст, подобрать ключ?
Да и вообще если по одному байту можно все вскрыть, то это же вообще пустяк. Пустил в цикле от $00 до $FF и всё!
А выходные данные проверяешь на диапазоны символов русского текста. Когда символов наберется в процентах более допустим 40 - выводить на memo или типа того.