[Alegun]

Можно немного подсократить код, вот вариант загрузки картинки из BLOBField через MemoryStream в Image

Код:

 MS:=TMemoryStream.Create;
 b:= TJpegImage.Create;
 TBLOBField(tbl.FieldByName('Рисунки')).SaveToStream(ms);
  try
    ms.Position:= 0;
    b.LoadFromStream(ms);
    Image1.Picture.Bitmap.Assign(b);
  finally
   b.Free;
   ms.Free;
  end;