Главная страница
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.028 c
1-1169504829
Дмитрий Белькевич
2007-01-23 01:27
2007.03.18
Насколько верен следующий код завершения программы:


15-1171879112
Ega23
2007-02-19 12:58
2007.03.18
В Delphi7 - Project Manager


5-1150058152
KIvan
2006-06-12 00:35
2007.03.18
Картинки в заголовках колонок TListView


15-1172140211
RomanH
2007-02-22 13:30
2007.03.18
Аналог IBExpert a для MSSQL


15-1171647538
Ксардас
2007-02-16 20:38
2007.03.18
Есть ли в html тег который