Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TAdoDataSet


Hooch ©   (2003-08-29 13:59:00) 

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


A_N_D   (2003-08-29 16:12:00) [1]

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;


Vlad   (2003-08-29 15:12:00) [2]

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


Hooch   (2003-08-29 14:07:00) [3]

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


Vlad   (2003-08-29 14:02:00) [4]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо