TAdoDataSet

← →
Hooch © (2003-08-29 13:59) [0]

День добрый !
Есть TadoDataSet, LockType = ltBatchOptimistic, как узнать были ли изменения (удаления, вставки и редактирование) не выставля флажки на событиях, т.е. есть какое-нибудь свойство говорящее о том что данны были изменены ?

← →
Vlad © (2003-08-29 14:02) [1]

Для текущей записи - свойство Modified

← →
Hooch © (2003-08-29 14:07) [2]

а как быть с удалёнными записями ? :-)

← →
Vlad © (2003-08-29 15:12) [3]

Не знаю как в ADO, а в BDE можно CachedUpdates сделать, и смотреть в кэш. Если там че есть, значит были изменения
Может в ADO нечто подобное есть ?

← →
A_N_D (2003-08-29 16:12) [4]

function AnyModified(ADODS:TCustomADODataSet):boolean;
var CD: boolean;
BookMark: pointer;
begin
Result:=false;
CD := ADODS.ControlsDisabled;
if not(CD) then ADODS.DisableControls;
BookMark := ADODS.GetBookmark;
ADODS.FilterGroup:=fgPendingRecords;
ADODS.Filtered:=true;
if (ADODS.RecordCount>0) then Result:=true;
ADODS.Filtered:=false;
ADODS.GotoBookmark(Bookmark);
if not(CD) then ADODS.EnableControls;
end;

TAdoDataSet Найти похожие ветки