Hallo, ich benutze die DCPCrypt Komponenten um eine (text)datei zu verschlüsseln.
Nun ist mir aber aufgefallen, dass immer wenn ich die datei entschlüssele die daten im
RAM liegen und das obwohl ich diese direkt verschlüsselt in einer stringlist speichere.
Dann ist mit aufgefallen, dass immer wenn ich die Decrypt prozedur aufrufe die daten im
RAM liegen bleiben, auch das freigeben der DCP Komponenten löscht die daten nicht. Weiss jemand rat?
Hier der verwendete Code:
Delphi-Quellcode:
procedure decrypt(t:Tstrings;AESKey:
string);
var
i: integer;
s:
string;
Cipher : TDCP_rijndael;
begin
try
Cipher :=TDCP_rijndael.create(
nil);
Cipher.InitStr(AESKey);
t.Text:=HexStrToString(t.Text);
for i:= 0
to t.Count-1
do
begin
s:=B64Decode(t.strings[i]);
Cipher.DecryptCFB(S[1],S[1],Length(S)); <- ab hier liegen die daten im
RAM
t.strings[i]:= s;
end;
Cipher.Reset;
Cipher.Burn;
finally
Cipher.free;
end;
end;