Кодирование.

← →
pkm (2006-03-23 07:44) [0]

Доброе время суток. Подскажите, мне в текстовом файле надо хранить пароли, как этот файл можно закодировать (чтобы никто не просмотрел их), и потом работать с ним?

← →
Der Nechk@ssoff © (2006-03-23 07:51) [1]

Скачай прогу для кодирования файлов.

← →
pkm (2006-03-23 08:00) [2]

Я закодирую прогой файл. Просмотреть его не смогут, а если смогут - ничего не поймут, а моя программа поймет, что там написано, когда я начну обращаться к закодированному файлу?

← →
Der Nechk@ssoff © (2006-03-23 08:01) [3]

> pkm (23.03.06 08:00) [2]

не факт...

← →
Morgoth_ (2006-03-23 09:03) [4]

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

← →
AbrosimovA (2006-03-23 09:26) [5]

function Crypt(Text,Key: String; Encode: boolean): String; var i, KeyLength: integer; Sign: ShortInt; begin KeyLength:=Length(Key); if Encode then Sign :=-1 else Sign:=1; //шифровать или расшифровывать? for i:=1 to Length(Text) do Text[i]:=chr(ord(Text[i])+Sign*ord(Key[i mod KeyLength+1])); Result:=Text; end;

Использование:

OutPsw:=Crypt(InPsw,"256",true); \\Шифрование OutPsw:=Crypt(InPsw,"256",false); \\Расшифровывание

← →
Parus © (2006-03-23 09:49) [6]

А лучше сам придумай алгоритм тогда никто не догадается как раскодировать :-)

Я в этом деле ламо

http://delphiworld.narod.ru/base/encode_decode_pass.html

А лучше создай шрифт(никому его не давай ато-Ахтунг!) и пароли вводи им

← →
Vetas (2006-03-23 15:49) [9]

А зачем придумывать алгоритм, если есть стандартные, например, RC4. И, кстати, легко программируется.

Кодирование. Найти похожие ветки