Comprimir y encriptar un stream
 

Hola amigos.
En estos momentos tengo una aplicación que prepara unas estructuras de datos (registros) y los vuelca en un TMemoryStream, luego lo comprimo con Zlib y lo envío por TCP. Ahora esto mismo necesito poder encriptarlo con algún algoritmo estandar para que otra aplicación en otro lenguaje las pueda desencriptar y descomprimir.
Alguna ayuda?
Delphi 7
Gracias.

Nunca la he usado, pero esta biblioteca es la mas conocida para Delphi, y ademas es libre.

Echa un vistazo a la librería criptográfica de seoane: SeCrypt


Saludos.

Gracias por las respuestas pero el problema que veo es que hasta ahora no logro comprimir y luego encriptar un TMemoryStream.
Para comprimir utilizo ZLib (ZCompressStream) y luego al intentar encriptar con 3DES de la librería LockBox me da error y si lo hago al revez no me genera nada. Alguien sabe si es posible hacer ambas cosas?
Gracias.