Delphi - [DELPHI] Implementare l'algoritmo SHA512

Salve a tutti, ho bisogno di implementare l'algoritmo SHA512 per criptare stringhe, in un'applicazione in Delphi 7...
Su internet non sono riuscito a trovare funzioni o componenti che mi permettono di fare questo.
Potete darmi una mano?
Grazie a tutti

mbè? te lo crei tu no? it.wikipedia.org/wiki/…

io per fare qualcosa io ero partito da questo esempio
delphi.icm.edu.pl/ftp/d20free/…

se poi vuoi dare un occhio alla sezione hashing di questa pagina fose trovi qualcosa di interessante
efg2.com/Lab/Library/Delphi/Algorithms/…