Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Базы данных и репортинг > чтение treeview из access

Автор: DYUMON 12.4.2011, 08:31

Доброго всем времени суток.
такая проблемма.
я сохраняю в базу содержимое access через поток.

Код


fpotok:=TMemoryStream.Create;
treeview1.SaveToStream(fpotok);
adoq.SQL.Clear;
adoq.SQL.Add(format('INSERT into files (id_files, name) values ("%s",:treep)',[filename]));
adoq.Parameters.CreateParameter('treep',ftBlob,pdInput,0,'');
adoq.Parameters.ParamByName('treep').LoadFromStream(fpotok,ftBlob);
adoq.ExecSQL;

а вот обратно считать данные не могу.
делаю так .просьба не пинать

Код


treeview1.Assign(adoq.FieldByName('name'));

а в итоге получаю ошибку. как можно закнать результат из adoquery в поток?

Автор: DYUMON 12.4.2011, 11:31

все нашел решение

Код


stream1:=TADOBlobStream.Create(TBlobField(ADOQ.FieldByName('имя поля')),bmRead);
treeview1.LoadFromStream(stream1);