Скачать: CL | DM;

Помогите с bitmap-ами в базе!!!   Найти похожие ветки 

← →
Chemist   (2002-07-20 21:30) [0]

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

---

← →
Lola ©   (2002-07-21 12:28) [1]

Попробуй:
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;

---

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

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

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

---

← →
Pasha676   (2002-07-23 14:01) [3]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c