Hallo.
Ich nutze das Delphi Encryption Compendium, Part I in Version 3.0 (als
VCL-Komponenten) und habe seit meiner Computerneuinstallation folgendes Problem:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
if not DECUtil.InitTestIsOk then
showmessage('Init Test failed'); // wird ausgegeben
ciphermanager1.Algorithm := '3Way';
ciphermanager1.InitKey('Res', nil);
showmessage(ciphermanager1.EncodeString('test')); // TlXg5g==
if not ciphermanager1.CipherClass.SelfTest then
showmessage('SelfTest failed'); // wird ausgegeben
end;
Vor der Neuinstallation funktionierte alles noch, jetzt scheint die Verschlüsselung zwar immernoch zu funktionieren, jedoch schlagen die SelfTest's und die Initialisierung der Komponente fehl.
Ich habe einen CipherManager und einen HashManager auf das Form gesetzt und den HashManager im CipherManager eingetragen.
Im Demo.dpr funktioniert alles (inkl. Selftests), jedoch kann ich mir nicht erklären, weshalb.