Traducir java a delphi
Publicado por Jorge (1 intervención) el 13/12/2018 15:41:16
Buenos dias señores del foro.
Disculpen la molestia pero no se programat en java por eso acudo a ustedes para ver si alguien pueda ayudarme hacer este codigo que esta hecho en java a hacer en delphi por favor.
Ejemplo para la generación del SHA-256 y MD5:
Ejemplo para la generación del CRC32:
Ejemplo de consumo de los métodos
Disculpen la molestia pero no se programat en java por eso acudo a ustedes para ver si alguien pueda ayudarme hacer este codigo que esta hecho en java a hacer en delphi por favor.
Ejemplo para la generación del SHA-256 y MD5:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
import java.security.MessageDigest;
import javax.xml.bind.DatatypeConverter;
public String algoritmoHash(byte[] pArchivo, String algorithm) {
String hashValue = “”;try {MessageDigest messageDigest = MessageDigest.
getInstance(algorithm);
messageDigest.update(pArchivo);
byte[] digestedBytes = messageDigest.digest();
hashValue = DatatypeConverter.
printHexBinary(digestedBytes).toLowerCase();
}catch (Exception e) {
System.out.println(“Error generando Hash”);
}return hashValue;
}Ejemplo para la generación del CRC32:
1
2
3
4
5
6
7
8
9
10
11
12
13
import java.util.zip.Checksum;
import java.util.zip.CRC32;
public String calCrc32(byte[] data) {
Checksum checksum = new CRC32();
checksum.update(data, 0, data.length);
long checksumValue = checksum.getValue();
String hex = Long.toHexString(checksumValue).
toUpperCase();
while (hex.length() < 8) {
hex = “0” + hex;
}return hex;
}Ejemplo de consumo de los métodos
1
2
3
4
5
6
7
8
9
10
11
12
public String obtenerMD5(byte[] archivo) {
String vHash = algoritmoHash(archivo,”MD5”);
return vHash;
}public String obtenerSHA2(byte[] archivo) {
String vSha2 = algoritmoHash(archivo,”SHA-256”);
return vSha2;
}public String obtenerCRC32(byte[] archivo) {
String vCrc = calCrc32(archivo);
return vCrc;
}Valora esta pregunta
0