Создание программы для запароливания файлов

[шолku]

Просьба всем оказать посильную помощь.

Суть.
Представьте себе, у вас есть файл, пароли.doc. Необходимо сделать так, чтоб никто кроме вас не смог его просмотреть. Программа создаёт Prd-файл, который содержит два файла: как раз пароли.doc и ещё один файл, скажем, conf.ini, где будут храниться некоторые данные. При щелчке на файле пароли.prd будет спрашиваться пароль, который хранится в conf.ini.
.prd (Protected Data FIle) - собственное расширение программы.

Вот.
Вопрос первый.
Напишите мне пожалуйста процедуру, которая будет склеивать два любых файла, и наоборот, процедуру, которая из prd-файла будет извлекать эти два файла.

[Сильванович Михаил]

Елки-палки! А мы че TFileStream не проходили? (модуль Classes) Как с ним работать есть в стандартной хелпе Delphi.

[SuperVisor]

Сообщение от Сильванович Михаил

Елки-палки! А мы че TFileStream не проходили? (модуль Classes) Как с ним работать есть в стандартной хелпе Delphi.

Ну... Я бы попросил без грубостей... Если нечего дельного посоветовать, оскорблять-то зачем? Лучше бы сказал что это и с чем это едят! А ты? Нехорошо получается... Или если сами знаем, а другие нет, то они (да простит меня администрация) - идиоты???

То шолku:
Используй либо типы - записи, либо TFileStream.

[Сильванович Михаил]

Сообщение от SuperVisor

Ну... Я бы попросил без грубостей... Если нечего дельного посоветовать, оскорблять-то зачем? Лучше бы сказал что это и с чем это едят! А ты? Нехорошо получается... Или если сами знаем, а другие нет, то они (да простит меня администрация) - идиоты???

То шолku:
Используй либо типы - записи, либо TFileStream.

Извините за грубость - больше не повториться - настроение че-то не вышло.

P.S. Совесть заела...

[шолku]

Ладно вам.

Вопрос второй.Требует творчества, изобретательности и смекалки.

С предыдущей проблемой я справился. Но есть одно но.
После открытия prd-файла, рядом с ним создаётся файл, который мы паролили (в моём примере -пароли.doc). Т.е. есть возможность им воспользоваться. Нужно придумать способ прятать этот файл куда-нибудь пока юзер с ним работает. Или ещё что-то, чтобы никто не знал откуда открывается пароли.doc, или хотябы ничего с ним сделать не смог.

Надеюсь понятно, что я имею ввиду, если что - спрашивайте.

[Сильванович Михаил]

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

[шолku]

Сообщение от Сильванович Михаил

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

Блин, мне это не о чём не говорит. Поясни подробнее свою идею. Как всё это будет происходить. Последовательно.

[Сильванович Михаил]

К примеру берется какое-то слово в качестве ключа и весь текст файла с
помощью XOR перебивается им (восстановить файл можно только зная ключ).
Если проще, то так:
Dest[i]:=Source[i] xor key[j];

[Speeker]

А почему бы не хранить пароли в реестре

[шолku]

А почему выдаёт ошибку такой код:

type
TSecretBox = record
Files : TStrings;
...
end;

var BOX : TSecretBox;
...

implementation

...

BOX.Files.Add(''); {На этой строке}

...