Warum funktioniert Undo nicht TClientDataSet.EmptyDataSet ?

[madina]

Hallo an alle,

// clone TClientDataSet
ich habe TMainForm.TClientDataSet1 und bearbeite seine Daten z.B. (lösche, einfüge od ändere) über TForm2.TClientDataSet2.CloneCursor(TMainForm.TClie ntDataSet1, true); in TForm2.

// ich lösche alle oder ein letzter vorh. DS:
iBeforeChanges:= TForm2.TClientDataSet2.SavePoint;
TForm2.TClientDataSet2.EmptyDataSet;

// undo
TForm2.TClientDataSet2.SavePoint:= iBeforeChanges;

// warum werden nach Undo alle oder der einziger vorh. DS bei CloneCursor nicht zurückgeholt ??????

mfg