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

Вниз

Шифрация/Дешифрация файлов   Найти похожие ветки 

 
XHunter   (2003-10-29 21:31) [0]

Решил попробовать использовать функцию API EncryptFile()
EncryptFile(FileName);
Компилируется нормально, но при запуске выдает:
"Точка входа в процедуру EncryptFile не найдена в библиотеке DLL kernel32.dll" Что может быть? Как с этим бороться?


 
nikkie ©   (2003-10-29 21:44) [1]

Requirements
Windows NT/2000: Requires Windows 2000.
Windows 95/98: Unsupported.


 
XHunter   (2003-10-30 11:10) [2]

To nikkie
Реплика, как бы мягко выразится, абсолютно безполезна. Я ж ясно указал, что 95/98 и не пахнет! Если нечего сказать, то лучше промолчать...


 
nollie   (2003-10-30 11:48) [3]

попробуй

procedure coding;
begin
(* шифрование заменой символов *)
for I := 1 to Length (Line) do
if Line [I] >= #32 then begin
J := Ord (Line [I]) - 32;
K := Ord (PassWord [I mod 13]) - 32;
Line [I] := Chr ((J + 224 - K) mod 224 + 32)
end;
end;

procedure decoding;
begin
(* дешифрирование замены символов *)
for I := 1 to Length (Line) do
if Line [I] >= #32 then begin
J := Ord (Line [I]) - 32;
K := Ord (PassWord [I mod 13]) - 32;
Line [I] := Chr ((J + K) mod 224 + 32)
end;
end;

хоть и больше кода, зато проблем меньше


 
dvp ©   (2003-10-30 11:49) [4]

EncryptFileW


 
XHunter   (2003-10-30 12:04) [5]

To DVP
Так получилось, но файл каким был, таким и остался, может нужно еще что - то выполнить?


 
Reindeer Moss Eater ©   (2003-10-30 12:10) [6]

может нужно еще что - то выполнить?

Разумеется.
Открыть контексты ключей, тасков, сертификатов и т.д.


 
XHunter   (2003-10-30 12:33) [7]

А поподробней


 
Reindeer Moss Eater ©   (2003-10-30 12:47) [8]

Подробней, чем MSCryptoSDK нет.

Если кратко, то для криптования нужны свои приватные ключи и открытые ключи корреспондентов, нужно специфицировать желаемые алгоритмы, форматы и т.д.

CryptAcquireContext,CryptSetProvParam и т.д.


 
savva ©   (2003-10-30 15:06) [9]

http://rsdn.ru/article/crypto/cryptoapi.xml


 
Brahman ©   (2003-10-30 16:24) [10]

Лучше с этим не вязаться, а использовать опубликованные библиотеки, например, от CRYPTOCard Corporation
MD5
RC5
RC4
IDEA
BLOWFISH
DES

С исходниками на Delphi


 
XHunter   (2003-11-14 21:03) [11]

Спасибо всем! Проблему решил - таки с помощью API, очень класно все описано в SDK, правда для C. Пришлось переводить... Поулчилось!


 
Diesel   (2003-12-16 14:07) [12]

А по конкретнее о крптовании файлов можно ?
если не тяжело то ответ на мыло :))



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

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

Наверх




Память: 0.49 MB
Время: 0.011 c
3-12243
Splinter
2004-02-09 15:50
2004.03.05
Объединение полей в Базе Данных


1-12393
denik
2004-02-24 19:51
2004.03.05
Как програмно развернуть ComboBox в LookUp поле ?


1-12314
Nimble
2004-02-25 17:20
2004.03.05
Создание своих компонентов


1-12375
$tranger
2004-02-24 20:07
2004.03.05
Работаю с фалами


1-12348
Алексей
2004-02-25 15:34
2004.03.05
editXXXXonChange... TNotifyEvent.. голова кругом идёт