Jpeg error #42 [D7, WinXP]
Сашка © (2004-06-14 10:45:00)
что это за ошибка? Никак понять не могу, чего от меня
требуется. Выскакивает при попытке уничтожить ранее созданный
объект:
var
JpgStream: TStream;
Jpg: TJpegImage;
begin
with DataModule do
begin
jpg := TJPEGImage.Create;
try
JpgStream :=
FTable.CreateBlobStream(FTable.FieldByName('small_img'),bmread);
jpg.LoadFromStream(JpgStream);
try
Fsearch_img_one.Picture.Assign(Jpg);
finally
FreeAndNil(JpgStream);
end;
finally
FreeAndNil(Jpg);
end;
end;
Ошибка выскакивает при попытке уничтожить поток в секции
finally
вот в этом месте
finally
FreeAndNil(JpgStream);
end;
Надеюсь на помощь. Заранее спасибо. Сашка
Сашка (2004-06-14 23:17:00) [1]
Мастера, неужели никто их вас не сталкивался с данной
проблемой?
Наверх 
ЧАТ |
Орешник |
|
