Фото в базе данных

[Gapro]

Ответь пожалуйста на вопрос - как показывать в сетке DBGrid1, ну или каким нибудь другим способом фото из базы данных Access? Просто подключив я увидел только (BLOB)?

[Stilet]

Подключи TDBImage к той базе и к тому полю

[Gapro]

А если нужно не bmp рисунок, а jpg? TDBImage при подключении к jpg выдвет ошибку

[Баламут]

Вот выдернул код из своего старого проекта. Поправил частично, т.к. думаю тут все просто и названия моих полей никого не смутят . Используется обыкновенный TImage.

var
  jpg: TJpegImage;
  ms: TStream;
 begin
if frmMain <> nil then frmMain.Image1.Picture := nil;
if not Datamodule1.StaffQueryPhoto.IsNull then
begin
with frmMain do
  begin
    jpg := TJpegImage.Create;
    ms := Datamodule1.StaffQuery.CreateBlobStream(TBlobField(Datamodule1.StaffQueryPhoto), bmRead);
    jpg.LoadFromStream(ms);
    Image1.Picture.Bitmap.Assign(jpg);
    jpg.Free;
    ms.Free;
  end;
  end;
end;