кодирование информации

← →
Shamansky (2004-12-21 23:24) [0]

Подскажите как можно закодировать структурированную информацию и сохранить в файл, потом соответственно раскодировать в виде структуры. то есть массив в файл, из файла в массив, защита нужна просто от дурака.

← →
Yanis © (2004-12-22 00:48) [1]

Наверное проще будет сначала записать в файл а потом его зашифровать.

← →
ocean (2004-12-22 09:44) [2]

Предлагаю использовать исключающее ИЛИ с битовой маской:
const iBitMask : Byte = 11010101b; //можно и любую другую
fOutFile : File of Byte; //AssignFile, Rewrite - само собой
procedure ReadByte(B : Byte);
begin
Write(fOutFile, Byte xor iBitMask);
end;
function ReadByte : Byte;
Var B : Byte;
begin
Read(fOutFile, Byte);
Result := Byte xor iBitMask;
end;

← →
Reindeer Moss Eater © (2004-12-22 09:50) [3]

Кодирование - это не шифрование.
А шифрование - это не кодирование.

← →
Роман_ (2004-12-23 09:40) [4]

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

Кодирование применяют не от дурака и не от умного.

← →
cadaber (2004-12-24 07:31) [6]

Делал нетипизированые, но структуированые "своим" методом файлы. Вместе с текстом складировал там и битмэпы и переменные. (Без всякого кодирования). Использовал TStream (TFileStream, TMemoryStream) - очень удобно.

кодирование информации Найти похожие ветки