Форум: "Базы";
Текущий архив: 2006.06.11;
Скачать: [xml.tar.bz2];
ВнизВытащить номер ошибки из 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 вся ветка
Форум: "Базы";
Текущий архив: 2006.06.11;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.013 c