Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Подскажите компоненту или dll чтобы зашифровать файл! [D6]

agrig © (2002-04-18 11:20:00)
сабж:)

agrig (2002-04-21 19:32:00) [1]
всем спасибо

Slava (2002-04-20 09:19:00) [2]
AES

http://www.eldos.org/elaes/elaes.html

perov (2002-04-20 07:09:00) [3]
http://crypto-central.com/
там много бесплатных компонент для шифрации

777 (2002-04-19 22:33:00) [4]
а как на счёт PGP SDK

agrig (2002-04-19 22:02:00) [5]
2 Yuraz:
спасибо конечно, но мне интересен реализованный RC-6, AES, CAST-256 или что-то в этом роде

Yuraz (2002-04-18 11:37:00) [6]
Процедурка, шифрующая string.

procedure Code(var text: string; password: string; decode: boolean);
var
i, PasswordLength: integer;
sign: shortint;
begin
PasswordLength := length(password);
if PasswordLength = 0 then Exit;
if decode
then sign := -1
else sign := 1;
for i := 1 to Length(text) do
text[i] := chr(ord(text[i]) + sign * ord(password[i mod PasswordLength + 1]));
end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »