Программирование на Delphi 7


         

Стандартный диалог обработки ошибок сервера



Рисунок 22.4. Стандартный диалог обработки ошибок сервера


Используя представленную здесь информацию, вы можете самостоятельно управлять обработкой ошибок сервера на клиенте. Но можно поступить и более просто — использовать стандартный диалог обработки удаленных ошибок (Рисунок 22.4). Этот диалог можно подключить к вашему проекту (он содержится в модуле \ObjRepos\RecError.pas) и вызвать при помощи процедуры:

function HandleReconcileError(DataSet: TDataSet; UpdateKind: TUpdateKind; ReconcileError: EReconcileError): TReconcileAction;

В параметры этой функции подставляются параметры метода-обработчика OnReconciieError, а возвращает данная функция действие, выбранное пользователем в диалоге (см. Рисунок 22.4). Таким образом, ее использование очень просто:

procedure TForml.ClientDataSetReconcileError(DataSet: TCustomClientDataSet;

E: EReconcileError; UpdateKind: TUpdateKind; 

var Action: TReconcileAction); 

begin

Action := HandleReconcileError(DataSet, UpdateKind, E) ; end;

 



Содержание раздела