VPF::Blob-поле! - Форум программистов

lotos

Дата 22.1.2004, 22:16 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 64
Регистрация: 18.1.2004

Репутация: нет
Всего: нет

Как записать в Blob поле файл *.jpg таким образом чтобы он потом мог просмотреться в DbImage при блуждание по записям.

Vit

Дата 22.1.2004, 23:33 (ссылка)

(нет голосов)

Загрузка ...

Vitaly Nevzorov

Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: нет
Всего: 207

в DbImage? Скорее всего никак, или довольно сложно...

Вот примеры кода:

Загрузка файла из TImage:

Код

      QAll.Edit;
      QAll.FieldByName('Logo').assign(Image.Picture);
      QAll.post;

Чтение файла из таблицы в TImage:

Код

Image.Picture.assign(QAll.FieldByName('Logo'));

Загрузка данных в поле:

Код

(Table1.DataSource2.Fields.Field[01] As TBlobField).LoadFromStream

Загрузка данных через параметры:

Запрос

Код

Insert into MyTable (MyBlobField)
Values (:Something)

В коде:

Код

(Query1.parameters.parambyname('Something') as TBlobField).LoadFromFile ...
(Query1.parameters.parambyname('Something') as TBlobField).LoadFromStream ...
(Query1.parameters.parambyname('Something') as TBlobField).assign ...

--------------------

With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru

x77

Дата 22.1.2004, 23:34 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1255
Регистрация: 25.3.2002

Репутация: 1
Всего: 22

Повесить событие на OnScroll таблицы, в котором приводить jpeg к битмапу и засовывать в обычный TImage

--------------------

Я никогда не сопротивлялся искушению, поскольку узнал: что мне
не нравится, то меня не искушает. © Джордж Бернард Шоу (Ирландия)

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Firebird, Interbase \| Следующая тема »