скрыть

скрыть

  Форум  

Delphi FAQ - Часто задаваемые вопросы

| Базы данных | Графика и Игры | Интернет и Сети | Компоненты и Классы | Мультимедиа |
| ОС и Железо | Программа и Интерфейс | Рабочий стол | Синтаксис | Технологии | Файловая система |



Google  
 

Прочитать BlobStream при помощи TADOQuery из базы Access



Оформил: DeeCo

function GetBlobStream(Query: TADOQuery): TMemoryStream;
 begin
   result := TMemoryStream.Create;

   // You must connect to AccessDB first. 
  // See: Query.Connection, TADOConection or Query.ConnectString 

  // Send SQL command 
  Query.Active := False;
   Query.SQL.Clear;
   // data is my row and email the table 
  Query.SQL.Append('SELECT data FROM email WHERE id=1');
   Query.Active := True;

   Result.LoadFromStream(Query.CreateBlobStream(Query.FieldByName('Data'), bmRead));
 end;





Copyright © 2004-2016 "Delphi Sources". Delphi World FAQ




Группа ВКонтакте   Ссылка на Twitter   Группа на Facebook