Thema: Delphi Probleme mit DCPcrypt

Einzelnen Beitrag anzeigen

Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.691 Beiträge
 
Delphi 11 Alexandria
 
#20

AW: Probleme mit DCPcrypt

  Alt 28. Mai 2018, 11:23
Delphi-Quellcode:
key := 'Super Geheim';
IV := 'DLX';
Es sind AnsiStrings, trag da ein was auch immer Du magst.

Ps:
Alternativ kannst Du es auch so machen:
function DecryptText(const Key, IV: AnsiString):String; Und Du rufst die Funktion mit entsprechenden Parameter auf.
Also so:
Delphi-Quellcode:
function DecryptText(const Key, IV: AnsiString):String;
var Cipher : TDCP_rijndael;
    Data : ansistring;
    //Key, IV : ansistring; // <- Das hier rauswerfen
    index, dataLength, bsize, pad: integer;
begin
// key := '12345678901234567890123456789012'; // <- Das hier rauswerfen
// IV := '1234567890123456'; // <- Das hier rauswerfen
Gruß vom KodeZwerg

Geändert von KodeZwerg (28. Mai 2018 um 11:49 Uhr)
  Mit Zitat antworten Zitat