Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Преобразовать _recordset в TMemoryStream [D7]


SergeyI ©   (2004-05-13 11:14:00) 

Уважаемые All, помогите с сабжем. Получаю результатом запроса рекодсет а мне требуется преобразовать его в поток


Delirium   (2004-05-13 13:01:00) [1]

Вот кусок кода, как поместить _recordset в TStrings, в TStream делается аналогично


var adoStream:OleVariant;
   St:TStrings;
begin
// Сначала ADODB.RecordSet -> ADODB.Stream через XML
adoStream:=CreateOLEObject('ADODB.Stream');
Variant(ARecordSet).Save(adoStream, adPersistXML);
// Теперь XML -> TStrings
St:=TStringList.Create;
St.Text:=adoStream.ReadText(adoStream.Size);


MIKE kouzmine   (2004-05-13 11:57:00) [2]

А в чем проблема?


Наверх

Титульная страница Поиск, карта сайта Написать письмо