Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.02;
Скачать: CL | DM;

Вниз

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

 
agrig   (2002-04-18 11:20) [0]

сабж:)


 
Yuraz ©   (2002-04-18 11:37) [1]

Процедурка, шифрующая 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;


 
agrig   (2002-04-19 22:02) [2]

2 Yuraz:
спасибо конечно, но мне интересен реализованный RC-6, AES, CAST-256 или что-то в этом роде


 
777 ©   (2002-04-19 22:33) [3]

а как на счёт PGP SDK


 
perov ©   (2002-04-20 07:09) [4]

http://crypto-central.com/
там много бесплатных компонент для шифрации


 
Slava ©   (2002-04-20 09:19) [5]

AES

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


 
agrig   (2002-04-21 19:32) [6]

всем спасибо



Страницы: 1 вся ветка

Текущий архив: 2002.05.02;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.011 c
1-2597
BlackGrin
2002-04-19 19:59
2002.05.02
Gif & Delphi


1-2580
СанчоП
2002-04-19 16:05
2002.05.02
Help me!!!


1-2531
agrig
2002-04-18 11:20
2002.05.02
Подскажите компоненту или dll чтобы зашифровать файл!


3-2456
valievrf
2002-04-10 17:00
2002.05.02
Для тех кто видел программу и для тех кто ее не видел, в чем дело


3-2450
Ash
2002-04-09 14:54
2002.05.02
Как в Fox-e физически удалить запись?