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

Вытащить номер ошибки из ADOQuery   Найти похожие ветки 

← →
parovoZZ ©   (2006-04-13 20:58) [0]

СабжЪ.

---

← →
parovoZZ ©   (2006-04-14 19:31) [1]

Получается, что это невозможно((

---

← →
liver   (2006-04-15 23:38) [2]


try
 выполнение запроса.
except
 on E: Exception do MessageDlg(E.Message, mtWarning, [mbOK], 0);
end;


---

← →
parovoZZ ©   (2006-04-16 01:14) [3]

Не, это мы знаем. Мне не нужна та билиберда, которую посылает драйвер.

SQL Explorer в поле server error пишет номер исключения. Как такое можно организовать?

---

← →
Хозяин   (2006-04-18 10:01) [4]

уп

---

← →
parovoZZ ©   (2006-04-18 10:11) [5]

И?

---

← →
ORMADA ©   (2006-04-18 14:57) [6]

try
     MainADOConnection.Open;
   except
     ExceptionMessage := "";
     for i := 0 to MainADOConnection.Errors.Count - 1 do
       ExceptionMessage := ExceptionMessage + MainADOConnection.Errors.Get_Item(i).Description;

     Application.MessageBox(PAnsiChar("Произошла следующая ошибка!" + #13 + ExceptionMessage + #13
       + "Обратитесь к Администратору!"), "Ошибка !", MB_ICONERROR);
   end;

---

← →
parovoZZ ©   (2006-04-19 23:50) [7]

Ну ясно, придётся слова в квадратных скобках самому вырезать.

---

← →
sniknik ©   (2006-04-20 00:32) [8]

нет, если внимательно посмотриш на коллекцию Errors в вышепреведенном примере.

---

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

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



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