Вниз
Скачать: CL | DM;

Нужен компонент наследник от TDataSet   Найти похожие ветки 

← →
Shuma ©   (2005-02-24 11:36) [0]

Уважаемые мастера! Нужен компонент наследник от TDataSet который получает данные из потока (TMemoryStream и т.д.) или массива структур или списка. Может кто знает где найти такой компонент. (Уж очень нехочется самому его писать :(.)


← →
Digitman ©   (2005-02-24 11:47) [1]

TClientDataSet


← →
Карелин Артем ©   (2005-02-24 11:48) [2]

На torry.net есть пяток таких компонентов.


← →
sniknik ©   (2005-02-24 12:01) [3]

TADODataSet


← →
KSergey ©   (2005-02-24 13:12) [4]

> [3] sniknik ©   (24.02.05 12:01)
> TADODataSet

А можно еще пару слов к этому?


← →
sniknik ©   (2005-02-24 13:48) [5]

> А можно еще пару слов к этому?
мзвини в пару не уложусь ;о)
ложим в поток и копируем из него (практически копирование рекордсета)

function CopyRecordSet(RecordSet:_RecordSet):_RecordSet;
var
 adoStream: OleVariant;
begin
 adoStream:= CreateOLEObject("ADODB.Stream");
 Variant(RecordSet).Save(adoStream, adPersistADTG);
 Result:= CreateOLEObject("ADODB.RecordSet") as _RecordSet;
 Result.CursorLocation:= adUseClient;
 Result.Open(adoStream, EmptyParam, adOpenStatic, adLockOptimistic, adOptionUnspecified);
 adoStream:= UnAssigned;
end;


← →
sniknik ©   (2005-02-24 13:52) [6]

да, на случай если непонятно как использовать ;)
можно так
ADODataSet2.Recordset:= CopyRecordSet(ADODataSet1.Recordset);



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.025 c
1-1111050918
markers
2005-03-17 12:15
2005.03.27
Pass


14-1110383090
Piter
2005-03-09 18:44
2005.03.27
Outpost блокирует транзитные пакеты


1-1110638833
[k]NikolaZ
2005-03-12 17:47
2005.03.27
Алгоритмы Архивирования


4-1108468976
pasha_golub
2005-02-15 15:02
2005.03.27
Запуск процесса из ресурса


1-1110873717
cautur
2005-03-15 11:01
2005.03.27
Код ошибки




   Наверх