Alguem consegue converter este codigo que está em Java para Pascal?

Delphi

15/07/2018

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;
Amauri Alves

Amauri Alves

Curtidas 0

Melhor post

Tiago

Tiago

16/07/2018

Cara, você poderia criar uma DLL em JAVA com esse código e usar no Delphi, como uma FUNCTION.
GOSTEI 1

Mais Respostas

Raimundo Pereira

Raimundo Pereira

15/07/2018

Veja se ajuda
http://www.chilkatsoft.com/p/p_146.asp
GOSTEI 0
POSTAR