А что-то более динамическое? К тому же речь идет о записях в определенном поле таблицы.
Может можно использовать функции Lib "ZLIB.DLL"? Только вот, какие? И если можно пример кода. Нужно в функцию передать rd!z (рекордсет), а вернуть расшифрованый текст, который можно было бы Print #1, то что вернула ф-ция.