Показать сообщение отдельно
  #6  
Старый 17.01.2013, 20:54
Аватар для vladimirse
vladimirse vladimirse вне форума
Прохожий
 
Регистрация: 16.01.2013
Сообщения: 37
Репутация: 10
По умолчанию

В общем с загрузкой вроде бы разобрался, создал поле blob, а саму загрузку реализовал через opendialog

Код:
procedure TForm1.Button1Click(Sender: TObject);
var
  filedata: TFileStream;
begin
  if OpenDialog1.Execute then begin
     filedata:= TFileStream.Create(OpenDialog1.Filename, fmOpenRead);
     ZTable1.Open;
     ZTable1.Insert;
     ZTable1.FieldByName('des').Text:=ExtractFileName(OpenDialog1.FileName);
     TBlobField(ZTable1.FieldByName('pic')).LoadFromStream(filedata);
     ZTable1.Post;
     filedata.Free;
  end;
end; 

Вот теперь не могу понять как можно вывести изображения из базы в TDBimage при выделении их в TDBGrid.
Ответить с цитированием