Библиотека программиста

08.05.2024 - Считывание и загрузка графики в базу данных

Рассмотрим пример работы с графикой в среде программирования Delphi



1. Как поместить изображение (картинку) в базу данных.

Приведу сразу пример:

Код
Table1.;
TBlobField(Table1.FieldByName('my_pic1')).LoadFile(OpenDialog1.FileName);
TBlobField(Table1.FieldByName('my_pic2')).Assign(Image1.Picture);
Table1.Post;

.
.
.
.
.
А теперь пояснения:

Класс TBlobField служит для работы с полями базы данных, представленных в виде большого количества бинарных данных (binary large object - BLOB).

Связь с таблицей базы данных осуществляется с помощью объекта Table1, для добавление новой записи служит команда . В поля таблицы my_pic1 и my_pic2, которые имеют тип BLOB (или binary для таблицы Paradox), загружаем изображения двумя способами: из файла (с помощью объекта OpenDialog1) и из объекта Image1.

2. Как считать картинку из базы данных.

Считать картинку из базы данных также не составляет труда. Это можно осуществить с помощью объекта TDBImage или нижеследующей командой:

Код
Image2.Picture.Assign(TBlobField(Table1.FieldByName('my_pic1')));
Опубликовано на сайте: http://www.coders-library.ru
Прямая ссылка: http://www.coders-library.ru/index.php?name=news&op=view&id=49

Error: Incorrect password!