Perlで言う「crypt」を、Delphiでできませんか?