Вниз
Скачать: CL | DM;

Помогите плийз!!!!   Найти похожие ветки 

← →
555   (2005-10-25 12:00) [0]

ОЧЕНЬ нужно сдулать так, чтобы сохраненные данные в файл были нечитаемы! То есть чтобы пользователь не мог ручками править данные в файлах из других программ.
Сохраняю данные в СтрингЛистах. Никак не получается сделать так чтобы сохранненные данные при открытии получались нечитаемыми. ((
Помогите плииийз! И если можно небольшой примерчик. )


← →
Ega23 ©   (2005-10-25 12:08) [1]

Помогите плииийз! И если можно небольшой примерчик. )

Да легко! Обращайся на egorov@dedal.dubna.ru


← →
Ega23 ©   (2005-10-25 12:09) [2]

Да, забыл!
Если можно - немножко денег.


← →
Zhekson   (2005-10-25 12:09) [3]

555   (25.10.05 12:00)
прячь файл


← →
WondeRu ©   (2005-10-25 12:12) [4]

шифрование отменили?


← →
Frozzen   (2005-10-25 12:29) [5]

Не канский случаем?
сохраняй его как бинарный, коли шифровать не нужно


← →
Gydvin ©   (2005-10-25 14:21) [6]

простейшая функция хор шифрования;

function koder(keyk:string;strin:string):string;
var key,longkey,text,pol: string;

i : integer;
toto, c,loiuper : char;
begin
key:=keyk;
text:=strin;
 if key="" then key:=#1;
longkey:="";
for i := 0 to (length(text) div length(key)) do
longkey := longkey + key;

for i := 1 to length(text) do begin
/// где-то здесь надо доделать защиту, чтоб при кодировки код символа
////неперевалил за 255
toto := chr((ord(text[i]) XOR ord(longkey[i]))); // XOR алгоритм
pol := pol + toto;

end;
text:="";
result:=pol;
end;


пример вызова

шифрация - дешифрация

s:=function koder(#1#2#3;s);

но ее надо доделать, а то можешь не декодировать


← →
umbra ©   (2005-10-25 14:38) [7]


> пользователь не мог ручками править данные в файлах из других
> программ


Это все зависит от уровня пользователя. Еще как вариант - можно файлы зиповать, а затем переставить местами  в архиве первые два байта. Или любые два байта из первых 32.


← →
Anatoly Podgoretsky ©   (2005-10-25 14:49) [8]

Чтобы шифровать существует бесчисленное количество методов, что бы не могли править только один - размещать на устройстве только для чтения.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c
1-1129901816
Андрей Жук
2005-10-21 17:36
2005.11.13
Ошибка объявления класса


2-1130253655
vvh
2005-10-25 19:20
2005.11.13
Поиск как в 1С


2-1130080255
TStas
2005-10-23 19:10
2005.11.13
Почему эдин программно неправильно выделятся?


2-1129547718
Parth
2005-10-17 15:15
2005.11.13
Консольное приложение: иероглифы


2-1129558566
Dush
2005-10-17 18:16
2005.11.13
inherited




   Наверх