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

Как правильно сделать независимую копию датасета?   Найти похожие ветки 

← →
Inna_Z   (2006-03-29 16:39) [0]

Нужно сделать полную независимую копию датасета TClientDataSet.

 В исходном датасете есть вычисляеме поля, которые например, теряются при присваивании:
 Result.Data := DataSet.Data;

 И вообще данный способ не подходит.

---

← →
Jeer ©   (2006-03-29 16:56) [1]

Было бы странно, если бы..

CreateDataset
*.FieldDefs.AddFieldDef
....

Затем по-рекордно read-insert

---

← →
Inna_Z   (2006-03-29 17:00) [2]

А что-нибудь более оптимальное чтобы не перемещаться по датасету с которого я копирую?

---

← →
Ega23 ©   (2006-03-29 17:11) [3]

> А что-нибудь более оптимальное чтобы не перемещаться по
> датасету с которого я копирую?


var
SaveLocation:variant;
begin

With CDS do
 begin
   SaveLoc:=FieldByName("KeyField").Value;
   DisableControls;
   First;
   While not Eof do
    begin
     ......
     Nex;l
    end;
   Locate("KeyField", SaveLocation, []);
   EnableControls;
 end;

---

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

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



Память: 0.45 MB
Время: 0.027 c