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

Вниз

MIDAS, ReconcileError и ClientDataSet.Append   Найти похожие ветки 

 
Nikolay M. ©   (2003-08-04 10:48) [0]

Назрел такой концептуальный вопрос.
В тонком клиенте есть форма редактирования чего-либо, скажем, аквариумных рыбок. При попытке добавить новую запись с неуникальным названием рыбки возникает ошибка на уровне БД (уникальный индекс), которая обрабатывается в обработчике ReconcileError и выдается сообщение пользователю.
Как можно красиво сделать откат ApplyUpdate-а в этом случае? Закрывать окно - грубо, там может быть много введенных данных. Если в ReconcileError делать Action := raCancel и тп, ClientDataSet выходит из режима вставки.
Единственное, что пока пришло в голову - это делать при возникновении ошибки в ReconcileError что-то вроде

Field1ErrorValue := CDS.Fields[0].Value;
...
Field10ErrorValue := CDS.Fields[9].Value;


А на кнопке ОК в форме редактирования делать:

if (CDS.ApplyUpdates (-1) > 0) then
begin
CDS.Append;
CDS.Fields[0].Value := Field1ErrorValue;
...
CDS.Fields[9].Value := Field10ErrorValue;
end;


Или поиграться с Delta, но все равно красотой, имхо, такой вариант не блещет :(
Делать
Action := HandleReconcileError(DataSet, UpdateKind, E);
тоже не очень хочется.


 
Соловьев ©   (2003-08-04 10:56) [1]


> ошибка на уровне БД (уникальный индекс),

а зачем давать пользователи редактировать уникальный индекс?


 
Nikolay M. ©   (2003-08-04 10:59) [2]


> а зачем давать пользователи редактировать уникальный индекс?



> добавить новую запись с неуникальным названием рыбки



 
Соловьев ©   (2003-08-04 11:29) [3]

уникальный индекс с неуникальным названием рыбки - это как? :)


 
Nikolay M. ©   (2003-08-04 11:40) [4]

Разжевываю.
Название рыбки должно быть уникально? Да, чтобы разные юзеры не заводили одинаковых рыбок и из-за этого не возникли дубли по названию. Для этого нужен уникальный индекс по полю "название рыбки".
Btw, редактировать индекс пользователю никто не разрешает, доступно редактирование значений поля, которые должны быть уникально, причем уникальность обеспечивается UNIQUE INDEX-ом по этому полю.


 
Соловьев ©   (2003-08-04 12:08) [5]

raCorrect Replace the current updated record with the value of the record in the event handler.


 
Nikolay M. ©   (2003-08-04 12:16) [6]

Я умею читать хелп :)
В любом случае 10Х за беспокойство :)



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

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

Наверх




Память: 0.48 MB
Время: 0.009 c
14-92170
Подзабыл...
2003-08-11 00:25
2003.08.28
WinSDK


1-92116
dvp1
2003-08-15 14:48
2003.08.28
Как отсортировать данные в двухпольном TStringGrid?


4-92297
Alone Corsar
2003-06-27 08:47
2003.08.28
Закрыть внешнее приложение с сохранением данных


3-92041
chexum
2003-08-04 14:25
2003.08.28
TDBChart


3-92013
SCORPION ZP
2003-07-30 19:20
2003.08.28
конвертация баз FoxPro в dBASE IV