Главная страница
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.073 c
2-1158657920
RomanH
2006-09-19 13:25
2006.10.08
Копирование файлов


2-1158837997
ququ
2006-09-21 15:26
2006.10.08
Move


11-1134493681
azsd
2005-12-13 20:08
2006.10.08
koledb with oracle - count() function


2-1158882264
Руслан12345
2006-09-22 03:44
2006.10.08
Типы данных


2-1158769175
vegarulez
2006-09-20 20:19
2006.10.08
Не появляется контекстная справка-выбиралка, после точки...