(Resolvido) Converter Codigo em java para delphi

[amauridebarros]

Bom dia

 

Preciso converter um código que está em Java para usar no delphi. este código criptografa uma senha.
Alguém consegue converter este código para pascal pois eu conhecimento em java é bem próximo de zero:

******************************************************************************************

import java.util.Base64;
import javax.crypto.Cipher;
import javax.crypto.spec.IvParameterSpec;
import javax.crypto.spec.SecretKeySpec;

public class Cryptography
{
private static String key = "G!P@4#1$1%M4SC4D";
private static String iv = "C#&UjO){QwzFcsPs";

public static String encrypt(String plainText) throws Exception
{
byte[] plainTextbytes = plainText.getBytes("UTF-8");
byte[] keyBytes = key.getBytes("UTF-8");
byte[] ivBytes = iv.getBytes("UTF-8");
Cipher cipher = Cipher.getInstance("AES/CBC/PKCS5Padding");
SecretKeySpec secKey = new SecretKeySpec(keyBytes, "AES");
cipher.init(Cipher.ENCRYPT_MODE, secKey, new IvParameterSpec(ivBytes));
return Base64.getEncoder().encodeToString(cipher.doFinal(plainTextbytes));
}
}
obrigado;

[Jhonas]

Existem muitas funções e até componentes  em dephi para criptografia de senhas

https://www.google.com.br/search?source=hp&ei=Za1MW6eENNDt5gKI5aTICA&q=criptografar+senha+delphi&o

ou pode tentar usar esse programa de conversão

http://www.pacifier.com/~mmead/jni/delphi/javadpr/index.html

abraço