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

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

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

DBImage и format JPEG [D6, D7, MSSQL]

melavcorp © (2003-03-19 15:02:00)
Доброго времени суток,господа!
Помогите ламеру решить проблему...Надо вставлять и отображать из MS SQL БД рисунки в формате JPEG. В uses добавил JPEG,рисунки грузятся в компонент DBImige, но в БД не сохраняются..С BMP все отлично...Может кусок кода, кто-нибудь подкинет, для решения???Очень надо!!!!Или есть готовый фриварный компонент под DELPHI6,7 ?????

Clickmaker (2003-03-19 15:44:00) [1]
uses ..., JPEG;

...

JpegImage := TJPEGImage.Create;
ImageStream := TBLOBStream.Create(TBlobField(BlobField), bmRead);
try
JpegImage.LoadFromStream(ImageStream);
DBImage.Picture.Assign(JpegImage);
finally
ImageStream.Free;
JpegImage.Free;
end;

// Сохранение

Stream := TBlobStream.Create(BlobField, bmReadWrite);
try
Stream.Seek(0, soFromBeginning);
Stream.Truncate;
DBImage.Picture.Graphic.SaveToStream(Stream);
finally
Stream.Free;
end;

melavcorp (2003-03-19 15:37:00) [2]
Храню - в MSSQL2000, формат поля -Image. Дело в том, что DBImage работает с форматом BMP, а мне надо сохранять рисунки в базе в формате Jpeg..
Делаю обычные действия..типа..
IF OpenPictureDialog1.Execute then
DBImage1.Picture.LoadFromFile(OpenPictureDialog1.FileName)
Далее...POSTом сохраняю в БД. Если BMP, то все ОК.Если JPEG, то рисунок из файла.*Jpeg в DBImage нормально загружается..но в БД не сохраняется....

Clickmaker (2003-03-19 15:04:00) [3]
Ты бы лучше сам подкинул кусок кода, который не работает у тебя. А то непонятно, что делаешь, где хранишь?

Наверх

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