Проблемы с ошибкой JPEG в Delphi

Question

У меня проблема cstrJERR_INPUT_EMPTY с ошибкой jpeg error # 41. Кажется, появляется в следующем коде:

 BlobStream := query1.CreateBlobStream(query1.FieldByName('imagecolumnname'),bmRead);
 JpegImage := TJPEGImage.Create;
 try
    BlobStream.Seek(0, soFromBeginning);
    // Image1.Picture.Graphic.LoadFromStream(BlobStream);
    JpegImage.LoadFromStream(BlobStream);
    image1.Picture.Assign(JpegImage);
    //image1.Picture.graphic:=(JpegImage);
    image1.Visible := True;
 finally
    JpegImage.Free;
    BlobStream.Free;