![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вытащить номер ошибки из ADOQuery [D7, MySQL]
parovoZZ © (2006-04-13 20:58:00)СабжЪ.
sniknik (2006-04-20 00:32:00) [1]нет, если внимательно посмотриш на коллекцию Errors в вышепреведенном примере.
parovoZZ (2006-04-19 23:50:00) [2]Ну ясно, придётся слова в квадратных скобках самому вырезать.
ORMADA (2006-04-18 14:57:00) [3]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-18 10:11:00) [4]И?
Хозяин (2006-04-18 10:01:00) [5]уп
parovoZZ (2006-04-16 01:14:00) [6]Не, это мы знаем. Мне не нужна та билиберда, которую посылает драйвер.
SQL Explorer в поле server error пишет номер исключения. Как такое можно организовать?
liver (2006-04-15 23:38:00) [7]
try
выполнение запроса.
except
on E: Exception do MessageDlg(E.Message, mtWarning, [mbOK], 0);
end;
parovoZZ (2006-04-14 19:31:00) [8]Получается, что это невозможно((