blob поле

@armany · Регистрация: 23.12.2009

Author24 — интернет-сервис помощи студентам

Здравствуйте ! немного непонятно с blob полями..
Пусть есть БД с несколькими таблицами. (см. РИС). КАК мне добавить blob поле и номер вопроса в одну строку таблицы 'картинки' ?
попытаюсь пояснить вопрос.Везде пишут что для добавления блоб полей используется следующий алгоритм :

Delphi

procedure TForm1.Button4Click(Sender: TObject);
var
 blob:Tmemorystream;
begin
  try
    if openPictureDialog1.Execute then
      begin
        AdoQuery1.Insert;
        Blob:=TadoBlobStream.Create(TblobField(AdoQuery1.FieldByName('imag')),bmWrite);
        Blob.LoadFromFile(OpenPictureDialog1.FileName);
        Blob.Free;
        AdoQuery1.Post;
      end;
  except
   on e :Exception do
  end;
end;

Из него мне понятно что картинка будет добавлена в поле 'imag' таблицы. А Мне нужно чтобы при нажатии кнопки в таблицу добавлялся номер вопроса в поле 'nom_vopr' и картинка в поле 'imag'. Что-то не понимаю как это сделать...

@armany · 02.05.2013, 16:52 **[ТС]**

Delphi

AdoQuery1.Insert;
AdoQuery1.FieldValues['nom_vopr'] := номер вопроса;
Blob:=TadoBlobStream.Create(TblobField(AdoQuery1.FieldByName ('imag')),bmWrite); // записываем его в blob поле
Blob.LoadFromFile(OpenPictureDialog1.FileName);
Blob.Free;
AdoQuery1.Post;

	02.05.2013, 16:52