Comprimir y encriptar un stream

[jars]

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.

[[AgustinOrtu]]

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

[[escafandra]]

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


Saludos.

[jars]

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.