Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Firebird, InterBase [игнор отключен] [закрыт для гостей] / использование BLOB для хранения картинок / 7 сообщений из 7, страница 1 из 1
04.04.2004, 11:51
    #32468184
ogone
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
использование BLOB для хранения картинок
Как из Delphi записать картинку в InterBase в поле BLOB, на post() жалуется, но в то же время сохраняет картинку.
...
Рейтинг: 0 / 0
04.04.2004, 18:04
    #32468286
konstsch
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
использование BLOB для хранения картинок
Можно сохранять BMP, JPEG.
Только для JPEG включи модуль jpeg в проект.

procedure TfMan.aAddFotoExecute(Sender: TObject);
var
IconStream : TMemoryStream;
begin
if OpenDialog.Execute then
begin
Image2.Picture.LoadFromFile(OpenDialog.FileName);
fdmSotrudnik.sdsFoto_man.Insert;
IconStream := TMemoryStream.Create;
Image2.Picture.Graphic.savetostream(IconStream);
(fdmSotrudnik.sdsFoto_man.fieldbyname('BMP') as TBlobField).LoadFromStream(IconStream);
fdmSotrudnik.sdsFoto_man.FieldByName('num').AsString:=inttostr(num);
fdmSotrudnik.sdsFoto_man.FieldByName('Date_Foto').AsDateTime:=now;
fdmSotrudnik.sdsFoto_man.ApplyUpdates(0);
IconStream.Free;
end;
end;
...
Рейтинг: 0 / 0
06.04.2004, 15:39
    #32470807
ogonekk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
использование BLOB для хранения картинок
Всё та же ошибка
...
Рейтинг: 0 / 0
07.04.2004, 04:47
    #32471391
StarWind
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
использование BLOB для хранения картинок
И какая же ошибка, позвольте узнать....
...
Рейтинг: 0 / 0
07.04.2004, 11:54
    #32471851
Мимопроходящий
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
использование BLOB для хранения картинок
В 17-й строке
...
Рейтинг: 0 / 0
07.04.2004, 12:20
    #32471907
Roman Ignatiev
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
использование BLOB для хранения картинок
ДА он Edit забыл сделать перед запихиванием картинки в поле :))
...
Рейтинг: 0 / 0
09.04.2004, 15:20
    #32475716
Araris
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
использование BLOB для хранения картинок
TMemoryStream для чего нужен-то ?

QueryPhoto.Edit;
QueryPhotoPhoto.LoadFromFile(OpenPictureDialog1.FileName);
QueryPhoto.Post;
QueryPhoto.ApplyUpdates;
...
Рейтинг: 0 / 0
Форумы / Firebird, InterBase [игнор отключен] [закрыт для гостей] / использование BLOB для хранения картинок / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]