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

В общем сделал так, но пока только в formcreate, не могу догнать как заюзать выбор в tbgrid:

Код:
procedure TForm1.FormCreate(Sender: TObject);
var
   blob: TStream;
begin
{connect}
ZConnection1.Connect;
ZTable1.Open;
DBGrid1.Columns[1].Width:=100;
DBGrid1.Columns[2].Width:=100;
{/connect}

blob:=ZTable1.CreateBlobStream(ZTable1.FieldByName('pic'), bmRead);
DBImage1.Picture.Jpeg.LoadFromStream(blob);
blob.Free;

end;
Ответить с цитированием