Einzelnen Beitrag anzeigen

bwolf

Registriert seit: 17. Jan 2006
368 Beiträge
 
Delphi 2009 Professional
 
#1

dcpcrypt2 + Delphi 2009

  Alt 14. Jan 2011, 13:59
Delphi-Version: 2009
Hi Leute,

es gibt zwar schon einen Thread zu dem Thema, ich muss aber trotzdem nochmal Fragen.
Ich habe soeben dcpcrypt2 für Delphi 2009/2010 heruntergeladen (Hier).
Leider schaffe ich es trotzdem nicht, einen String zu ver- und entschlüsseln.
Beim entschlüsseln kriege ich "chinesische Zeichen", also wohl ein Unicode-Problem.

Getestet habe ich mit folgendem simplen Code:

Code:
procedure TForm1.Button1Click(Sender: TObject);
begin
  DCP_3DES1.InitStr('test',TDCP_sha1);
  Showmessage( DCP_3DES1.DecryptString(DCP_3DES1.EncryptString('passwort')) )
end;
Hat einer einen Tip?
1000 dank!
  Mit Zitat antworten Zitat