Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.10.08;
Скачать: CL | DM;

Вниз

Хранение и отображение картики в базе Access   Найти похожие ветки 

 
Klever ©   (2006-08-05 22:19) [0]

Мне  нужно отображать в моей проге картинки для каждой строки записи базы Access. На форме лежит DBGrid1. Есть также кнопка открытия(добавления) картинки AddImage. И окно отображения DBImage1ю.Я пишу
procedure TForm1.AddImageClick(Sender: TObject);
var
ImageStream:TMemoryStream;
begin
if OpenPictureDialog1.Execute then begin
 ImageStream:=TMemoryStream.Create;
 try
   ImageStream.LoadFromFile(OpenPictureDialog1.FileName);
   try
       ADOQuery1.Append;
       ADOQuery1.FieldByName
("fieldpath").asString:=OpenPictureDialog1.FileName;
       TBlobField(ADOQuery1.FieldByName("ImageData")).LoadFromStream(ImageStream);
       ADOQuery1.Post;
       except on e:Exception do begin
             end;
       end;
 finally
   ImageStream.Free;
 end;
end;
end;

в базе данных есть такие поля
DI -AutoIncrement
fieldpath - Text (255)
ImageData - OLE Object

В ADOQuery1 настройки
Connection  :  DataModule1.ADOConnection1
Datasourse  :  DataModule1.DataSource1
Если я не включаю активным ADOQuery1  при выборе картинки нажатии Добавить открывается диалоговое окно добавления картинки. При нажатии на  картинку показывается сообщение:
Project Project.exe raised exception class EDatabaseError with message "ADOQuery1: cannot perform this operation on a closed dataset".Process stopped. Use Step or Run to continue.

При попытке поставить Active в True компилится нормально, но при запуске выдает осразу ошибку "Project Project.exe raised exception class EDatabaseError with message "Mising Connection or ConnectionString"..."

Вродебы все подробно описал .Как решить такую проблему. Уже не помню сколько над ней мучаюсь.
Заранее спасибо.


 
Johnmen ©   (2006-08-06 00:08) [1]

Читать до просветления предпоследний пост
http://delphimaster.net/view/3-1154704412/
и последний - в обязательном порядке!


 
Klever ©   (2006-08-06 10:54) [2]

to JohnPerdMem
Ты если не знаешь как помочь, то тихооонько сиди за компом и не умничай, а то много умных развелось, конкретного ответа дать не могут.


 
sniknik ©   (2006-08-06 12:30) [3]

ссылка и указание вроде на конкретное "лекарство"... ну а последнее совершенно справедливо если видя ответ ты не способен его даже понять...

ну а сам пост [2], показывает насколько на самом деле тебе это нужно... (вернее, а не нужно ли тебе другое? поиграть в "праведное возмушение" например)
посему... не обессудь.



Страницы: 1 вся ветка

Текущий архив: 2006.10.08;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.061 c
2-1157950790
lobach
2006-09-11 08:59
2006.10.08
List Box


8-1142541887
Slava_NV
2006-03-16 23:44
2006.10.08
Люди помогите с литературой.


15-1158669123
vidiv
2006-09-19 16:32
2006.10.08
Снятие пароля на setup для ноутбука.


15-1158556137
pavel_guzhanov
2006-09-18 09:08
2006.10.08
Программирование для КПК и мобильников


15-1158505411
Tirael
2006-09-17 19:03
2006.10.08
чайник