Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.03.18;
Скачать: CL | DM;

Вниз

раскодирование файла   Найти похожие ветки 

 
dim-   (2007-02-21 23:29) [0]

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


 
Джо ©   (2007-02-21 23:38) [1]

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


 
clickmaker ©   (2007-02-22 17:06) [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-22 17:10) [3]

> а зачем два?

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



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

Текущий архив: 2007.03.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.035 c
15-1171640133
atruhin
2007-02-16 18:35
2007.03.18
наследование фрэймов в Delphi 7


1-1169123392
Apachi
2007-01-18 15:29
2007.03.18
разблокировать чужой файл


2-1172482644
Bogdan1024
2007-02-26 12:37
2007.03.18
Каст от одного типа к другому


2-1172406975
Kolan
2007-02-25 15:36
2007.03.18
Memo.Lines.AddStrings долго отображает если много строк.


8-1153332425
DevilDevil
2006-07-19 22:07
2007.03.18
Конвентировать Битмап в jpg, gif, png и другие форматы