Скачать: CL | DM;

Картинки в ACCESS - беда   Найти похожие ветки 

← →
nickmix ©   (2006-11-21 05:32) [0]

Доброго времени суток! Уважаемые, подскажите, пожалуйста как положить картинку jpeg в Blob поле ACCESSа. Постоянно возникает ошибка типа - "неверный bmp формат". BMPшки ложаться нормально, НО размер базы просто катострофический - 140 записей - 1,5 гб!. Приложение начинает жутко тормозить. Ложу из DBImage.

---

← →
nickmix ©   (2006-11-21 07:39) [1]

Уже в другом вопрос. На формат ругается именно DBImage. Как сделать так, чтобы он видел JPEG? Если предложите другие компоненты, то какие, нужно подобие DBImage и QRDBImage.

---

← →
Stanislav ©   (2006-11-21 08:52) [2]

На форму лоешь, обычный image и вызываешь эту функцию на afterscroll
uses ...JPEG...
......

function ShowJPG (Field:TBlobField;var Image:TImage):Integer;
var S:TMemoryStream;J:TJPEGImage;
begin
Result:=0;
if not Field.DataSet.Active or Field.IsNull
then
 begin
   Image.Canvas.Brush.Color:=clBtnFace;
   Image.Canvas.FloodFill(0,0,clWhite,fsSurface);
   patBlt (Image.Canvas.Handle ,0,0,Image.Picture.Width,Image.Picture.Height,PATCOPY);
 end
else
 begin
   S:=TmemoryStream.Create;
   J:=TJpegImage.Create;
   S.Position:=0;
   Field.SaveToStream(S);
   S.Position:=0;
   J.LoadFromStream(S);
   Image.Picture.Bitmap.Assign(J);
   Result:=S.Size;
   J.Free;
   S.Free;
 end;

end

---

← →
Виталий Панасенко   (2006-11-21 10:47) [3]

Или тянешь БЕСПЛАТНЫЕ JEDI компоненты и используешь JvDBImage - там форматов поддерживаемых тьма(я так понял все (или почти все) графические форматы).
http://jvcl.sourceforge.net

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.044 c