Fórum Alguem consegue converter este codigo que está em Java para Pascal? #595485

Boa tarde,
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;