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

Query   Найти похожие ветки 

← →
Neket   (2007-01-05 14:28) [0]

Подскажите как правельно обработать ошибку при использовании Query таким образом:

Form1.Query3.close;
Form1.Query3.SQL.Clear;
If StrZapros <> ""  then
Form1.Query3.SQL.Add(StrZapros)
else
begin
messageDlg("&#205;&#229; &#225;&#251;&#235; &#226;&#226;&#229;&#228;&#229;&#237; SQL-&#231;&#224;&#239;&#240;&#238;&#241;", mtError, [mbOK], 0);
exit;
end;
try
Form1.Query3.ExecSQL; // при возниконовении ошибки у меня компилятор выкидывает здесь ошибку т.е. обработчик по всей видимости не срабатывает.
except
On e : EDatabaseError do
begin
Form1.Memo1.Lines.Add("//      WRITE IN BD - NO     \\");
Exit;
end;
end;
Form1.Memo1.Lines.Add("//     WRITE IN BD - YES     \\");

Ошибка мне известна. Я специально пишу в не существующую таблицу для проверки того как у меня отработает обработчик.
Заранее спасибо

---

← →
Anatoly Podgoretsky ©   (2007-01-05 14:35) [1]

> Neket  (05.01.2007 14:28:00)  [0]

А если поставить точку останов?

---

← →
Neket   (2007-01-05 14:44) [2]

Попробовал... Вылетает именно на Form1.Query3.ExecSQL т.е. обработчик не срабатывет

---

← →
try   (2007-01-05 14:48) [3]

Запусти ехешник и удивись.
Кстати, причём тут компилятор?

---

← →
Neket   (2007-01-05 15:03) [4]

2 try: Ошибся... Не компилятор а дебагер... :-)

А как отключить такую обработку ошибок в Delphi?

---

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

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



Память: 0.45 MB
Время: 0.029 c