Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Сохранение в Аксесовскую базу JPEG

Автор: Fedor 25.9.2004, 16:01

Собсно, есть такой код, который работает с Аксесовской базой данных:
Questions[i].QuestionPicture имеет тип TPicture
Поле Picture таблицы Question_info имеет формат OLE

Код


    if Questions[i].QuestionPicture<>nil then
     begin
       s:='UPDATE Questions_info SET Picture =:d WHERE id=:id';
       ADOQuery1.Sql.Clear;
       ADOQuery1.SQL.Add(s);
       ADOQuery1.Parameters.ParamByName('d').Assign(Questions[i].QuestionPicture);
       ADOQuery1.Parameters.ParamByName('id').Value:=IntToStr(qq);
       ADOQuery1.ExecSQL;
     end;

Пока в поле Picture можно заносить только bmp, ico... А как минимальными

исправлениями кода сделать так, чтоб сохранились еще и JPEGи.

В DRKB вроде написано, но я чето не понял...

Автор: _hunter 25.9.2004, 17:28

сменить тип поля на BLOB

Автор: Fedor 25.9.2004, 23:31

Где? В Aксесе?