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

Вниз

Jpeg error #42   Найти похожие ветки 

 
Сашка   (2004-06-14 10:45) [0]

что это за ошибка? Никак понять не могу, чего от меня требуется. Выскакивает при попытке уничтожить ранее созданный объект:

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) [1]

Мастера, неужели никто их вас не сталкивался с данной проблемой?



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

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

Наверх




Память: 0.46 MB
Время: 0.044 c
8-1080722002
Pul
2004-03-31 12:33
2004.06.27
Битмап в метафайле


11-1074873849
=Sniper=
2004-01-23 19:04
2004.06.27
Как сделать простейшую подсветку HTML синтаксиса...?


1-1087305419
}|{yk
2004-06-15 17:16
2004.06.27
Как добавить строку в Memo


14-1086870125
*Pavel
2004-06-10 16:22
2004.06.27
Принтеры штрихкодов


1-1086997816
Syava
2004-06-12 03:50
2004.06.27
Как распечатать StringGrid?