Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: [1]   Вниз
  Печать  
Автор Тема: Разместить и считать картинку в БД SQL  (Прочитано 11359 раз)
0 Пользователей и 2 Гостей смотрят эту тему.
Arinyshka
Белый клоун, бедный мученик...
Постоялец

by
Offline Offline
Пол: Женский

« : 08-04-2008 14:22 » 

Не сочтите за оскорбление, вопрос мой прост.
Нужно размещать в БД картинки и считывать их оттуда. Имеем MS SQL 2005, Delphi (ADO), bmp- картинки...
Хранимая выглядит так:
ALTER PROCEDURE [dbo].[ImP_add_Image]
@Image_PurposePay image
AS
   begin transaction
       insert into ImageForPurposePay
           (Image_PurposePay)
       values
           (@Image_PurposePay)
    if (@@error != 0) begin
      select 'Ok', -1
      rollback transaction
      return
    end
  commit transaction

В таблице ImageForPurposePay поле Image_PurposePay типа Image, естественно...

Delphi:

procedure TForm1.FormCreate(Sender: TObject);
 var MyStream: TMemoryStream;
begin
   MyStream := TMemoryStream.Create;
   image1.Picture.bitmap.SaveToStream(MyStream);
   qrUni.SQL.Append('ImP_add_Image :Image_PurposePay');
   MyStream.Position := 0;
   qrUni.Parameters.ParamByName('Image_PurposePay').LoadFromStream(MyStream,ftGraphic);
   qrUni.open;
end;

qrUni - TAdoQuery

Компилируется. На выполнении уходит с ошибкой
Project xxxx raised exception class EOleExeption with message 'Неправильно определен объект parametr. Представлены  несовместимые или неполные сведения'.

Только не заводите (пожалуйста!) дискуссию о рациональности хранения картинок в базе... я их уже начиталась Улыбаюсь Мне бы понять, в чем ошибка...
Записан

Непонятная свобода обручем сдавила грудь...
Джон
просто
Администратор

de
Offline Offline
Пол: Мужской

« Ответ #1 : 08-04-2008 14:41 » 

Может это всё-таки вопрос по Дельфи?
Записан

Я вам что? Дурак? По выходным и праздникам на работе работать. По выходным и праздникам я работаю дома.
"Just because the language allows you to do something does not mean that it’s the correct thing to do." Trey Nash
"Physics is like sex: sure, it may give some practical results, but that's not why we do it." Richard P. Feynman
"All science is either physics or stamp collecting." Ernest Rutherford
"Wer will, findet Wege, wer nicht will, findet Gründe."
Oldy
Команда клуба

ru
Offline Offline
Пол: Мужской

« Ответ #2 : 09-04-2008 15:10 » 

Цитата
qrUni.Parameters.ParamByName('Image_PurposePay').LoadFromStream(MyStream,ftGraphic);
что нужно передавать, ссылку на картинку или картинку?
Записан

С уважением, Oldy.
Arinyshka
Белый клоун, бедный мученик...
Постоялец

by
Offline Offline
Пол: Женский

« Ответ #3 : 10-04-2008 08:06 » 

Передавать нужно было картинку - и туда, и обратно. Проблема оказалась рядом - написала, но не сохранила хранимую Улыбаюсь Коммита оказалось мало Жаль Непривычный менеджер Улыбаюсь Код работает Улыбаюсь
Записан

Непонятная свобода обручем сдавила грудь...
Кукунь
Гость
« Ответ #4 : 25-03-2010 20:05 » new

а в чем проблема была, потому что у меня тоже самое...
Записан
RXL
Технический
Администратор

Offline Offline
Пол: Мужской

WWW
« Ответ #5 : 26-03-2010 04:31 » 

Кукунь, внимательно прочитай предыдущий пост. Если соблюдать правила грамматики, как это сделал предыдущий оратор, то двусмысленность отсутствует.
Записан

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
Страниц: [1]   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines