Текущий архив: 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.049 c
