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

Вниз

TJPEGImage проблемы с потоком   Найти похожие ветки 

 
Zeqfreed ©   (2004-09-12 10:01) [0]

procedure LoadImg(idx : Cardinal);
var
JPG : TJPEGImage;
begin
if (idx > imgsNum - 1) then Exit;

Streams[idx].SaveToFile("f:\tst.jpg");

JPG := TJPEGImage.Create;
JPG.LoadFromStream(Streams[idx]);

frmScr.imgMain.Picture.Assign(JPG);
JPG.Destroy;
end;


Этот код выдает ошибку "JPEG error #41".

procedure LoadImg(idx : Cardinal);
var
JPG : TJPEGImage;
begin
if (idx > imgsNum - 1) then Exit;

Streams[idx].SaveToFile("f:\tst.jpg");

JPG := TJPEGImage.Create;
JPG.LoadFromFile("f:\tst.jpg");

frmScr.imgMain.Picture.Assign(JPG);
JPG.Destroy;
end;


Этот код работает

Объясните, а чем причина, пожалуйста! Я никак не могу понять, почему он не хочет грузить из потока (Streams - массив of TMemoryStream) но из файла, сохраненного из потока грузит прекрасно. И что значит ошибка 41?


 
Zeqfreed ©   (2004-09-12 10:09) [1]

Добавлю, что если я гружу поток из файла, то 1-ый код тоже работает, но у меня есть файл в нем подряд записаны несколько JPG-изображений. Так вот я считываю в потоки последовательно данные из этого файла, т.е. Stream.CopyFrom. Я так думаю, что ошибки при заполнении потоков нет, потому что сохраненные файлы из этих потоков читаются и имеют правильный размер.



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

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

Наверх




Память: 0.46 MB
Время: 0.058 c
14-1094401976
Stany
2004-09-05 20:32
2004.09.26
исходник для подсчета интернет траффика


3-1093867645
Yrtimd
2004-08-30 16:07
2004.09.26
Что такое FireBird?


9-1085601029
GuAV
2004-05-26 23:50
2004.09.26
TBitmap поверх DirectX


4-1090889552
Dyck-iy
2004-07-27 04:52
2004.09.26
порты под ХР


14-1094546302
nick-from
2004-09-07 12:38
2004.09.26
Какие есть приличные стрелялки-убивалки сейчас?