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

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

раскодирование файла [D7, WinXP]


dim- ©   (2007-02-21 23:29:00) 

Есть файл (jpg) закодированный XOR, как его раскодировать в памяти и подсунуть в Image без промежуточного файла


Джо   (2007-02-22 17:10:00) [1]

> а зачем два?

Да, собственно, можно и один и даже без MS.Memory. Простым изменением Position и read/write в один и тот же.


clickmaker   (2007-02-22 17:06:00) [2]


> [1] Джо ©   (21.02.07 23:38)

а зачем два?
var P: PByte; // PInteger
P := MS.Memory;
S := MS.Size;
while (S >= 0) do begin
  P^ := P^ xor что-то;
  Inc(P);
  Dec(S);
end;


Джо   (2007-02-21 23:38:00) [3]

Загружаем в TMemoryStream. XOR'им еще раз в другой TMemoryStream. Делаем LoadFromStream из этого стрима.


Наверх

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