Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

запаковать растры [Delphi, Windows]


WonderfulDay ©   (2005-09-12 19:14:00) 

А где можно найти примеры запаковки 8-битных растров в один файл с шифрованием? На дэлфиgfx увы только простое запаковывание.


Servelat   (2005-09-13 20:04:00) [1]

Бей вирусописателей! (=
Вообще метод XProger'а мне больше нравится, там не по одному и тому же байту xor'ится, а по последовательности, что посложнее будет отгадать потенциальному взломщику.

Просто мысль вслух:
Зачем вирусу под ДОС запакованные 8'битные растры? Или " подобным методом" означало что он xor юзал (= ? Тогда аналогия слабовата с сабжем.

Зы

> Простой метод

Давай сложный теперь.


OSokin   (2005-09-13 19:52:00) [2]

Простой метод: запаковываешь каждый файл в архив формата "длина_имени_файла имя_файла размер_рисунка рисунок", а потом криптуешь по XOR'у с помощью HIEW'а или своей программы (я один раз в лабораторных условиях вирус для ДОСа писал, он подобным методом работает)


XProger   (2005-09-13 11:47:00) [3]

Вообще, так можно и файлы побайтно "криптовать" :)


WonderfulDay   (2005-09-13 09:28:00) [4]

Прикольный метод.
Это относится к палитре или к цвету пикселя?


XProger   (2005-09-13 00:08:00) [5]

Servy,
как обычно во время написания думал о другом :)

RandSeed := passkey;
color := color xor random(256);


Servy   (2005-09-12 23:04:00) [6]

2 XProger
Вообще идея правильная, что-то такое автору топика и надо сделать, но как у программиста, у меня возникает вопрос нафига нужно что-то писать в RandSeed, если это потом никак не используется (Random не вызывается)  :)
__________________
Good luck & Have fun


XProger   (2005-09-12 21:14:00) [7]


RandSeed := passkey;
color := color xor passkey;


Наверх

Титульная страница Поиск, карта сайта Написать письмо