![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Преобразовать _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]А в чем проблема?