![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Компрессия потоков. [D7, WinXP]
qawsed © (2005-01-24 14:46:00)var fs: TFileStream; cs: TCompressionStream;
fs := TFileStream.Create(SourceFile, fmCreate);
cs := TCompressionStream.Create(clMax, fs);
Form1.DXImageList1.Items.SaveToStream(ts);
Form1.DXWaveList1.Items.SaveToStream(ts);
fs.Free;
cs.Free;
ts.Free;
Вызывает исключение Inbalid stream operation.
Что бы это значило.
GuAV (2005-01-24 15:46:00) [1]Нельзя осуществлять некоторые операции с TCompressionStream и с TDecompressionStream. Скорее всего, прийдётся воспользоваться промежуточным TMemoryStream, при чём перед его записью в TCompressionStreamписать размер. Что именно не так - выполните тот же код при Use debug DCUs.
Poirot (2005-01-24 15:11:00) [2]А что есть "ts"?