| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

TDBImage (извлечь из Microsoft Access) [D6, Access]

HelDet ©   (2003-05-21 13:01:00) 

Есть база данных, созданная с помощью Microsoft Access, которая содержит поле с изображением (*.BMP,*.JPG). Это поле в Access имеет тип OLE и не извлекается при подключении к базе компонента TDBImage. Возникает ошибка "Bitmap is not valid". Помогите извлечь картинку.

---

KoluChi   (2003-05-21 13:33:00) [1]

tBlob Field(dataset.blobfield).SaveToStream(stream);

---

KoluChi   (2003-05-21 13:32:00) [2]

TDBImage не понимает формата jpeg. Выводить можно на TImage.
Включаем модуль jpeg.
приблизительный код для jpeg (писал по памяти):
var
jpg: tJpegImage;
stream: tStream;
begin
stream := TStream.Create();
try
tBlobStream(dataset.blobfield).SaveToStream(stream);
jpg.LoadFromStream(Stream);
Image.Picture.Assign(jpg);
finally
stream.Free();
end;
end;

---

Наверх