В общем, тема длинная только начал разбираться. Первая проблема -
Код:
var
hProv: HCRYPTPROV;
hKey:HCRYPTKEY;
buffer:string;
len:DWORD;
begin
buffer := 'Password';
len := length(buffer);
CryptAcquireContext(@hProv, nil, nil, PROV_RSA_FULL, CRYPT_VERIFYCONTEXT);
CryptGenKey(hProv, CALG_RC4,CRYPT_ENCRYPT or CRYPT_DECRYPT,@hKey);
CryptEncrypt(hKey, 0, FALSE, 0, @buffer[1], @len, len);
ShowMessage(buffer);
Этот код ничё не шифрует хотя по логике всё правильно. В общем есть у кого
РАБОЧИЕ исходники шифрования на Dlephi??