Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.01.21;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.058 c
15-1167570296
Ломброзо
2006-12-31 16:04
2007.01.21
А что у нас на столе?


15-1167412230
Footballer
2006-12-29 20:10
2007.01.21
Копирование


15-1167231770
Ega23
2006-12-27 18:02
2007.01.21
А вот про ShortCut вопрос:


2-1168065288
Igor_Z
2007-01-06 09:34
2007.01.21
Обрезка файла


2-1167990875
forex
2007-01-05 12:54
2007.01.21
эмулятор командной строки