Es mucho mejor que uses una libreria de encriptacion adecuada, y no codigo que vas "pegando" por ahi (en especial porque el codigo que pones NO ES ENCRIPTACION, es TOTALMENTE INSEGURO).
Bcrypt es uno de los algoritmos que se recomiendan a hoy:
https://github.com/JoseJimeniz/bcrypt-for-delphi
Si usas la libreria de Jedi, ellos tienen un wrapper para el CryptoAPI de MS, que es una libreria integrada en windows y muy recomendable (o puedes usar cualquier wrapper de la misma, no tiene que ser jedi)