Hallo,
ich versuche gerade ActionS*****-Code zu Delphi zu portieren.
Der Code sieht wie folgt aus:
Code:
import com.hurlant.crypto.*;
import com.hurlant.crypto.hash.*;
import com.hurlant.crypto.symmetric.*;
import com.hurlant.util.*;
import flash.utils.*;
var str1:String ="blncjsdfj/jhj/mJdfldfs";
var str2:String ="kJd94kfjs93";
str3 = Hex.fromArray(new MD5().hash(Hex.toArray(Hex.fromString(String(str1 + str2))))).toUpperCase();
str3 ergibt dann
Code:
3A06062CFD4C4391FCAB062A6F7E3BFA
Ich nutze Delphi XE2 und habe das Delphi Encryption Compendium (DEC) von [
Link nur für registrierte Mitglieder sichtbar. Bitte einloggen oder neu registrieren ] heruntergeladen.
Folgenden Code habe ich geschrieben:
Code:
str3 := THash_MD5.CalcBinary(TFormat_HEX.Encode(str1+str2), TFormat_Hex));
Doch leider erhalte ich dort nicht dasselbe Ergebnis. Ich erhalte dann immer
Code:
FB7D857208174506BD7D85AC5FF06421
als Ergebnis.
Kann jemand mir helfen, den Code richtig übersetzen.
Danke