Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Ошибка при добавлении картинки в базу [D7, Access]


Shuma ©   (2004-11-30 15:28:00) 

При добавлении картинки в базу (при вызове Post), выдает сообщение "Произошли ошибки во время многошаговой операции. Проверьте значение всех состояний".


Shuma   (2004-11-30 17:22:00) [1]

Огромное спасибо!!!!


sniknik   (2004-11-30 17:19:00) [2]

> тип поля на OLEсмени
"Поле объекта OLE" если прямо по "аксессовскому"


Shuma   (2004-11-30 17:03:00) [3]

sniknik ©   (30.11.04 16:52) [13]
укажи тип поля


sniknik   (2004-11-30 16:52:00) [4]

> при открытии базы выдает "Stream read error"
о! уже good правильно заработало. тип поля на OLE смени.


Shuma   (2004-11-30 16:43:00) [5]

И самое странное что теперь картинку невидно.


Александр Иванов   (2004-11-30 16:43:00) [6]

sniknik ©   (30.11.04 16:38) [9]
Нет, у меня не Мемо :)


Shuma   (2004-11-30 16:41:00) [7]

Поубирал ссылки на поля в форме и тоже все заработало.
Теперь проблема с полем Image, когда соединяю его с TDBImage, при открытии базы выдает "Stream read error".
Меня это уже конкретно достало :(.


sniknik   (2004-11-30 16:38:00) [8]

> У меня этот код ошибок не вызывает. Странно.
а у тебя тоже
> поле базы "Поле МЕМО"
?
тогда действительно странно. (странно что > в TDBImage картинку видно.)


Александр Иванов   (2004-11-30 16:18:00) [9]

У меня этот код ошибок не вызывает. Странно.


Shuma   (2004-11-30 16:03:00) [10]

tblFilms.Append;
tblFilmsName_Film.Value:='Áåç íàçâàíèÿ';
tblFilmsID_Group.Value:=1;                
tblFilmsID_Type.Value:=1;                
tblFilmsSign.Value:=2;
tblFilmsPath.Value:=' ';
Stream:=TFileStream.Create('c:\bmp\def1.bmp',fmOpenRead);
tblFilmsImage.LoadFromStream(Stream);
Stream.Free;
tblFilms.Post


Shuma   (2004-11-30 15:55:00) [11]

Картинка читается и отображается а записываться в базу нехочет.
Access вообще умеет записывать картинки в базу?


Александр Иванов   (2004-11-30 15:55:00) [12]

Это я запарился :).
Возможно ошибка в другизх строках, которые были пропущены.


Shuma   (2004-11-30 15:53:00) [13]

Второй параметр fmOpenRead и всеравно выдает ошибку.


Александр Иванов   (2004-11-30 15:48:00) [14]

Stream:=TFileStream.Create('c:\bmp\def1.bmp',fmOpenRead);
Второй параметр проверь.


Shuma   (2004-11-30 15:46:00) [15]

Пробовал двумя способами
1. tblFilmsImage.LoadFromFile('c:\bmp\def1.bmp');
2. var Stream: TFileStream;
  ...
    Stream:=TFileStream.Create('c:\bmp\def1.bmp',fmOpenRead);
    tblFilmsImage.LoadFromStream(Stream);
    Stream.Free;
  ...

где tblFilmsImage - поле базы "Поле МЕМО"

в TDBImage картинку видно.


Александр Иванов   (2004-11-30 15:38:00) [16]

Код покажите.


Наверх

Титульная страница Поиск, карта сайта Написать письмо