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

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

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

Как вставить в DBImage1 картинку программным путем? [D3, D5, dBase, FoxPro, Paradox]

Arthur1 © (2004-01-29 13:39:00)

Как вставить в DBImage1 картинку программным путем?

Ega23 (2004-01-29 16:43:00) [1]

> А по условиям вопроса картинка из файла должна стать видна
> в TDBImage

DBImage1.Picture.LoadFromFile(FileName).
или
DBImage1.LoadImage;

Reindeer Moss Eater (2004-01-29 16:40:00) [2]

А по условиям вопроса картинка из файла должна стать видна в T DBImage

Ega23 (2004-01-29 16:39:00) [3]

> Val © (29.01.04 16:29) [10]
> >Ega23 © (29.01.04 16:14) [6]
> Пример несколько сбивающий с толку:
> 1. Почему не использовать OpenPictureDialog?
> 2. Тревожное приведение TBLOBfield(), лучше as TBlobField,
> мне кажется.
> 3. Почему не использовать DBImage?
> 4. То что вы делаете, можно сделать с помощью потоков, дабы
> не тормозить приложение дисковыми операциями.

Этот пример - выгрузка фотографии сотрудника из БД. По условиям задачи необходимо чтобы фото хранилось в той же директории, что и exe и с конкретным именем.
Также фото должно изображаться на форме.

Val (2004-01-29 16:29:00) [4]

>Ega23 © (29.01.04 16:14) [6]
Пример несколько сбивающий с толку:
1. Почему не использовать OpenPictureDialog?
2. Тревожное приведение TBLOBfield(), лучше as TBlobField, мне кажется.
3. Почему не использовать DBImage?
4. То что вы делаете, можно сделать с помощью потоков, дабы не тормозить приложение дисковыми операциями.

GSVSerg (2004-01-29 16:28:00) [5]

kvp © (29.01.04 16:22) [8]
А если файл JPEG?

kvp (2004-01-29 16:22:00) [6]

У меня сделано так:
procedure TFCxema.DBImage1DblClick(Sender: TObject);
begin
If Table1.ReadOnly=False then begin
If OpenPictureDialog1.Execute then
begin
Table1.Edit;
DBImage1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
Table1.Post;
end; end;
end;

Ega23 (2004-01-29 16:14:00) [7]

FileName:=ExtractFilePath(ParamStr(0))+"FaceImg.jpg"; TBLOBfield(Query1.FieldByName("PersFaceImg")).SaveToFile(FileName); Image1.LoadFromFile(FileName);

Reindeer Moss Eater (2004-01-29 16:14:00) [8]

Класс TBlobField
Метод LoadFromFile

Arthur1 (2004-01-29 16:11:00) [9]

А как это реализовать конктретно? Пример, если можно.
Я создал парадоксовкую таблицу, побвязал таблицу к DBImage и всё работает. Но в DBImage могу вставить только из буфера, а это меня не устраивает - нужно из файла.

Val (2004-01-29 16:00:00) [10]

Хм..хорошо сказал...
У BLOB-поля ...
Имелся ввиду класс TBlobField, экземпляр которого будет представлять Ваше BLOB-поле в приложении.

Val (2004-01-29 15:54:00) [11]

Нужно иметь для этого в таблице базы данных BLOB-поле для хранения изображения. У BLOB-поля есть метод для загрузки данных с диска.

Arthur1 (2004-01-29 15:05:00) [12]

Мне нужно по сути загрузить картинку из файла (или из Image) в базу данных. Если точнее, то меня в полне устроит что-то типа
Table1.Fieldbyname("s1").AsString:="AAABBBCCC", но только не со строкой, а с картинкой. Вроди из хелпа понял, что нужно
Table1.Fieldbyname("s1").AsVariant:= ???, но что конкретно ставить вместо ???, я не знаю.

Может есть другие пути (или варианты)?

Val (2004-01-29 14:44:00) [13]

1.загрузить из файла
2.загрузить из буфера обмена
3.загрузить из БД

Наверх

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