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

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

Помогите с bitmap-ами в базе!!! [D5, dBase, FoxPro, Paradox]

Chemist ©   (2002-07-20 21:30:00) 

Немогу вставить картинки в базу данных.

---

Pasha676   (2002-07-23 14:01:00) [1]

Вопрос некоректен. Надо уточнить что за база. Как осуществляется доступ. Через ТТаble или через ТQuery.
В общем случае советую посмотреть демо пример, который поставляется с Дельфи. Там все основы есть.

---

IlyaA   (2002-07-22 10:08:00) [2]

> Lola не плохой способ, но можно и без стримов

Можно преобразовать Table.FieldByName("Blob") к TBlobField, а у неого есть методы LoadFromFile и SaveToFile.

---

Lola   (2002-07-21 12:28:00) [3]

Попробуй:
procedure GetPictureFromField;
- передача картинки из БД в DBImage

var ImageStream: TBlobStream;
begin
ImageStream:=TBlobStream.Create(Form1.Query1.FieldByName("Photo") as
TBlobField, bmRead);

try Form1.DBImage1.Picture.Graphic.LoadFromStream(ImageStream);
finally ImageStream.Free;
end;
end;

procedure GivPictureToField;
- передача картинки в БД при вставке/редактировании

var ImageStream: TBlobStream;
begin
ImageStream:=TBlobStream.Create(Form1.Query1.FieldByName("Photo") as
TBlobField, bmWrite);

try Form1.DBImage1.Picture.Graphic.SaveToStream(ImageStream);
finally ImageStream.Free;
end;
end;

---

Наверх