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

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

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

Запись картинки с Image в БД Access [D7]

npr2 © (2005-10-04 06:47:00)
Помогите, плиз! Необходимо сохранить в БД в поле картинку с Image. Не могу определить как передать параметр, т.е. нужно получить типа Q.ParambyName('p1').*:= Image.picture.bitmap
Или как-то нужно по другому поступить.

Monk (2005-10-04 16:02:00) [1]
Можешь воспользоваться набором компонентов ImageEn. Там все решено с загрузкой и отображением картинок большинства популярных форматов (в том числе jpeg и gif) в базу и реализация очень простая.

Monk (2005-10-04 16:02:00) [2]
Можешь воспользоваться набором компонентов ImageEn. Там все решено с загрузкой и отображением картинок большинства популярных форматов (в том числе jpeg и gif) в базу и реализация очень простая.

Виталий Панасенко (2005-10-04 12:29:00) [3]
Только формат Bitmap...я на Релибе ответил

Tbl.Append;
TblBMP.Assign(Image1.Picture.Bitmap);
Tbl.Post;
Qry.ParamByName('bmp').Assign(Image1.Picture.Bitmap);
Qry.ExecSQL;
Tbl.Refresh;
Tbl.Last;

Виталий Панасенко (2005-10-04 12:29:00) [4]
Удалено модератором

Desdechado (2005-10-04 11:32:00) [5]
stream.free надо делать ПЕРЕД execsql, если я правильно помню

npr2 (2005-10-04 10:52:00) [6]
сохраняю кадр видео на Image
VideoGrabber1.CaptureFrameTo(fc_TBitmap);
создаю поток
stream:=TMemoryStream.Create;
картинку сохраняю в файл и поток
BitM:=Image6.Picture.Bitmap;
BitM.SaveToFile('tt.bmp');
BitM.SaveToStream(stream);
stream.Position:=0;
распечатываю размер потока stream.saze-он равен 0.
сохраняю поток в БД - поле пусто
Insert_BR_Q.ParamByName('p23').LoadFromStream(stream,ftBlob);
если сохраняю в БД как файл, то сохраняется картинка предыдущего кадра, который записывался в файл. Такое впечатление, что файл не успевает закрыться.
// Insert_BR_Q.ParamByName('p23').LoadFromFile('tt.bmp',ftBlob);
Insert_BR_Q.ExecSQL;
stream.Free;
Как выйти из этой ситуации я не знаю. В чем я неправа.

Desdechado (2005-10-04 10:24:00) [7]
LoadFromStream
SaveToStream

Наверх

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