Скачать: CL | DM;

Как вместо окна системного сообщ. вывести своё   Найти похожие ветки 

← →
lovres ©   (2002-08-08 13:51) [0]

Суть в том, что при попытке обновления БД в процессе выполнения запроса происходит ошибка, свызанная с тем, что некоторые поля не могут быть пустыми. Я обрабатываю эту ошибку и делаю CancelUpdates, но выводится системное диалоговое окно. Как можно заменить текст в нём, а лучше запретить его вывод или вывести вместо него своё сообщение

---

← →
Skier ©   (2002-08-08 13:54) [1]

>lovres

Используй try-блок...

try
//your code goes here...
except
on E : Exception do ShowMessage("Your message !")
end; //try

или так

try
//your code goes here...
except
ShowMessage("Your message !");
end; //try

---

← →
lovres ©   (2002-08-08 14:44) [2]

to Skier
Я, вообще, не очень опытен, но мне как бы некуда try блок вписать, я произвожу изменения в самом DBGrid"е(редактирую строку) и обновление вызывается автоматически(эти действия в моём коде никак не отражены)

---

← →
Skier ©   (2002-08-08 14:48) [3]

>lovres


> Я обрабатываю эту ошибку


Тогда расскажи как ты её обрабатываешь...

---

← →
lovres ©   (2002-08-08 14:57) [4]

procedure TData.Quest_by_ThemePostError(DataSet: TDataSet;
E: EDatabaseError; var Action: TDataAction);
begin

Quest_by_Theme.CancelUpdates;

end;
выполнение программы в этом случае продолжается, но до этого выводится сообщение типа "Cannot insert the value NULL into...и т.д."
как заменить или отменить вывод сообщения

---

← →
Skier ©   (2002-08-08 15:05) [5]

>lovres
Action := daAbort ?

---

← →
lovres ©   (2002-08-08 15:29) [6]

Спасибо! Сообщение больше не выводится!

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c