Сообщение об ошибке СУБД
vlv © (2002-02-01 19:10:00)
Как узнать номер ошибки , возвращенный СУБД
после неудачного Query1.ExecSQL?
Фэ (2002-02-01 22:48:00) [1]
try
Query.ExecSQL;
except
on E: EDatabaseError do begin
MessageDlg(E.Message, mtError, [mbOk], 0);
end;
end;
Коды ошибок определены в bde.int.
Посмотри также пример \DEMOS\DB\DBERRORS.
Обрати внимание на EDBEngineError и
его Errors[i]: TDBError
в котором будут интересны Category,ErrorCode,SubCode,Message.
Поизучай dbexcept.pas метод .ShowError
Наверх 
ЧАТ |
Орешник |
|
