[Aristarh Dark]

Запись картинки в БД:

Код:

begin
  ADOquery1.sql.text:='Insert into tdSotr (Photo) Values (:b)';  
//Это добавит новую запись, для существующей запрос немного другой:
//ADOquery1.sql.text:='UPDATE tdSotr SET Photo = :b WHERE [тут условие]';
  ADOQuery1.parameters.parseSQL(ADOquery1.sql.text, true);
  ADOQuery1.parameters.parambyname('b').LoadFromFile('c:\1.bmp',ftGraphic);
  try
    ADOQuery1.execsql;
  except
    ShowMessage('Ошибка при загрузке картинки в базу');
    Exit;
  end;
  ShowMessage('Картинка загружена');
end;