![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
EDatabaseError
Delphist2 © (2010-03-30 15:08:00)Есть такое исключение, как EDatabaseError. Но как получить больше информацию об ошибке?
Jeer (2010-03-30 16:12:00) [21]
> Delphist2 (30.03.10 15:42) [2]
>
> ADO, драйвер Jet
Ну и смотри "ADO, драйвер Jet"
Delphist2 (2010-03-30 15:42:00) [22]ADO, драйвер Jet
Jeer (2010-03-30 15:36:00) [23]Зависит от Engine..
Для BDE можно было так:
function GetDBErrors_(E: Exception):integer;
begin
if (E is EDatabaseError) then
Result := (EDBEngineError(E).Errors[0].ErrorCode)
else
Result := 99999;
end;