Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Картинки в ACCESS - беда

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

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

Stanislav (2006-11-21 08:52:00) [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

nickmix (2006-11-21 07:39:00) [3]
Уже в другом вопрос. На формат ругается именно DBImage. Как сделать так, чтобы он видел JPEG? Если предложите другие компоненты, то какие, нужно подобие DBImage и QRDBImage.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »