Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.12.05;
Скачать: CL | DM;

Вниз

TDataSetProvider.OnUpdateError   Найти похожие ветки 

 
val_5 ©   (2003-11-12 15:11) [0]

Имеется DataSetMaster(это TSQLDataSet) и подклученный к нему (через TDataSource) DataSetDetail. К TDataSetProvider подключен DataSetMaster. Вопрос - как в TDataSetProvider.OnUpdateError определить - при работе с каким dataset-ом, главным или детальным, произошла ошибка.


 
val_5 ©   (2003-11-13 17:05) [1]

Я нашол решение. В параметре DataSet ( который передается в TDataSetProvider.OnUpdateError ) берем DataSet.DataSetField :
IF DataSet.DataSetField = nil then
 ошибка произошла при Update записей из DataSetMaster,
 ссылка на него это TDataSetProvider(Sender).DataSet
ELSE
 ошибка произошла при Update записей из DataSetDetail,
 его имя (TDataSet.Name) содержится в DataSet.DataSetField.FieldName !
 НО КАК ОПРЕДЕЛИТЬ ССЫЛКУ НА НЕГО ?
 Можно предположить что у DataSetMaster и DataSetDetail один и тот же Owner, тогда :
 OwnerSourceDataSet:=TDataSetProvider(Sender).DataSet.Owner;
 for I:=0 to OwnerSourceDataSet.ComponentCount - 1 do
   if ( OwnerSourceDataSet.Components[I] is TDataSet ) and
      ( OwnerSourceDataSet.Components[I].Name = DataSet.DataSetField.FieldName ) then begin
     SourceDataSet:=TDataSet(OwnerSourceDataSet.Components[I]);
     Break;
   end;
 НО МОЖЕТ МОЖНО КАК ТО ПРОЩЕ ???



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

Текущий архив: 2004.12.05;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.043 c
1-1100890969
AlexHawk
2004-11-19 22:02
2004.12.05
апуск и останов таймера кнопками с клавы??


1-1100675286
Jay
2004-11-17 10:08
2004.12.05
Help Button


14-1100623824
Gopstop
2004-11-16 19:50
2004.12.05
Москвичи, трансвааль парк уже востановили?


8-1094274897
Nomolos
2004-09-04 09:14
2004.12.05
MCI-окна


14-1100248365
Григорьев Антон
2004-11-12 11:32
2004.12.05
Пятничная головоломка по Delphi