| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
SysUtils [D6, Win2k]
HDD © (2002-04-22 16:53:00)Люди добрые как можно с помощью SysUtils зашифровать и расшифровать текст!
Заранее благодарен
VictorT (2002-04-23 11:36:00) [1]
> Timon © (23.04.02 11:23)
Ещё раз зашифровать зашифрованный текст по тому же ключу.
Timon (2002-04-23 11:23:00) [2]eSKey, что-то я не понял, а расшифровывать твое художесвто как?
eSKey (2002-04-23 11:16:00) [3]Простейший пример, без гарантий работоспособности, не застрахован от ошибок :)
//Cryptkey - лонгинт ключ генерации
//sourcestr - исходная строка
//cryptstr - зашифрованная строка
randseed:=-abs(Cryptkey); // нужно отрицательное значение (не уверен ;))
for i:=1 to length (sourcestr) do
cryptstr[i]:=char(byte(sourcestr[i]) xor random(256));
perov (2002-04-23 08:21:00) [4]http://crypto-central.com/
HDD (2002-04-23 06:41:00) [5]Да EsKey прав! Мож чё подскажите!
EAlexander (2002-04-22 18:12:00) [6]torry.net
там простой и надежный метод есть - с копирайтом и не только Самого Подгорецкого :):)
Леха_ (2002-04-22 17:51:00) [7]Поищи в инете там функций и компонент для шифрования вагон и маленькая тележка
Почитай теорию и напиши свои
А в Sysutils по моему таких функций нет
eSKey (2002-04-22 17:48:00) [8]
> Cobalt
Насколько я знаю, там нет функций шифрования.
Да не ты не понял =) все можно, и даже без SysUtils
ответ HDD- с помощью xor"а :) Шифрование правда будет еще то, зато дешево и сердито ;)
kull (2002-04-22 17:45:00) [9]
> (скорее всего понадобится изучать ассемблер),
???????????????
Cobalt (2002-04-22 17:43:00) [10]А почему именно > с помощью SysUtils?
Насколько я знаю, там нет функций шифрования.
Ищите документацию по алгоритмам шифрования (скорее всего понадобится изучать ассемблер), и пишите собственные функции...
"Удачи в темных делах" ;))
| |
