Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.05.06;
Скачать: [xml.tar.bz2];

Вниз

SysUtils   Найти похожие ветки 

 
HDD   (2002-04-22 16:53) [0]

Люди добрые как можно с помощью SysUtils зашифровать и расшифровать текст!
Заранее благодарен


 
Cobalt   (2002-04-22 17:43) [1]

А почему именно > с помощью SysUtils ?

Насколько я знаю, там нет функций шифрования.
Ищите документацию по алгоритмам шифрования (скорее всего понадобится изучать ассемблер), и пишите собственные функции...

"Удачи в темных делах" ;))


 
kull   (2002-04-22 17:45) [2]


> (скорее всего понадобится изучать ассемблер),

???????????????


 
eSKey   (2002-04-22 17:48) [3]


> Cobalt
Насколько я знаю, там нет функций шифрования.



Да не ты не понял =) все можно, и даже без SysUtils

ответ HDD - с помощью xor"а :) Шифрование правда будет еще то, зато дешево и сердито ;)



 
Леха_   (2002-04-22 17:51) [4]

Поищи в инете там функций и компонент для шифрования вагон и маленькая тележка
Почитай теорию и напиши свои

А в Sysutils по моему таких функций нет


 
EAlexander   (2002-04-22 18:12) [5]

torry.net
там простой и надежный метод есть - с копирайтом и не только Самого Подгорецкого :):)


 
HDD   (2002-04-23 06:41) [6]

Да EsKey прав! Мож чё подскажите!


 
perov   (2002-04-23 08:21) [7]

http://crypto-central.com/


 
eSKey   (2002-04-23 11:16) [8]

Простейший пример, без гарантий работоспособности, не застрахован от ошибок :)
//Cryptkey - лонгинт ключ генерации
//sourcestr - исходная строка
//cryptstr - зашифрованная строка

randseed:=-abs(Cryptkey); // нужно отрицательное значение (не уверен ;))
for i:=1 to length (sourcestr) do
cryptstr[i]:=char(byte(sourcestr[i]) xor random(256));



 
Timon   (2002-04-23 11:23) [9]

eSKey, что-то я не понял, а расшифровывать твое художесвто как?


 
VictorT   (2002-04-23 11:36) [10]


> Timon © (23.04.02 11:23)

Ещё раз зашифровать зашифрованный текст по тому же ключу.



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

Форум: "Основная";
Текущий архив: 2002.05.06;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.013 c
4-17758
Egor12345
2002-03-01 09:53
2002.05.06
Замена процедуры окна


1-17589
Zyxel
2002-04-22 16:13
2002.05.06
Types of actual and formal var parameters must be identical


4-17726
mrvovik
2002-02-27 12:39
2002.05.06
Господа, как обрубить запуск exe-шника


6-17650
Elf(new)
2002-02-20 12:22
2002.05.06
Смена имени пользователя без перезагрузки...


1-17644
Саша
2002-04-23 10:30
2002.05.06
Размер mdichild окна





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский