Estos son ejemplos para calcular un HASH, por lo que no son ejemplos de encriptación
Para cifrar o descifrar puedes mirar
este ejemplo.
Mira estos dos links que te envían a la web de Seoane para cifrar strings o archivos.
strings:
delphi.jmrds.com/?q=node/44
archivos:
delphi.jmrds.com/?q=node/70