powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / AppliactionEvents OnException через E код ошибки
12 сообщений из 12, страница 1 из 1
AppliactionEvents OnException через E код ошибки
    #39740917
AdamAry
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как поймать ошибку зная её номер (ORA-02292) в
Код: pascal
1.
procedure TForm1.AppliactionEvents1Exception(Sender: TObject; E: Exception);



текст сообщения ошибки это
Код: pascal
1.
E.Message 


как получить номер ошибки через ?:
Код: pascal
1.
E 
...
Рейтинг: 0 / 0
AppliactionEvents OnException через E код ошибки
    #39740922
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AdamAryКак поймать ошибку зная её номер (ORA-02292)

Залезть в место исходников где эта ошибка выкидывается и посмотреть класс исключения. Если
в этом классе есть поле под номер - проверить класс Е и если он нужный - привести к нему и
получить номер.

В противном случае - обломись.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
AppliactionEvents OnException через E код ошибки
    #39740929
AdamAry
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Dimitry Sibiryakov,
если не ошибаюсь
Код: pascal
1.
ClassName равен 'EOracleError'


и как в этом случае из
Код: pascal
1.
E


получить номер ошибки?
...
Рейтинг: 0 / 0
AppliactionEvents OnException через E код ошибки
    #39740942
zinpub
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
AdamAry,

Код: pascal
1.
2.
 if E is EOraError then 
  EOraError(E).ErrorCode
...
Рейтинг: 0 / 0
AppliactionEvents OnException через E код ошибки
    #39740944
AdamAry
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AdamAry,
прошу прощения, описался, правильно
Код: pascal
1.
ClassName равен 'EOraError'
...
Рейтинг: 0 / 0
AppliactionEvents OnException через E код ошибки
    #39740976
Фотография Док
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AdamAry,
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
try
...
except
  on E:EOraError do
  begin
    //здесь анализ чего-там тебе нужно
    //и выдача либо своего сообщения, либо
    //системного в виде E.Message
  end;
end;
...
Рейтинг: 0 / 0
AppliactionEvents OnException через E код ошибки
    #39740999
AdamAry
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Док,
Код: pascal
1.
procedure TForm1.AppliactionEvents1Exception(Sender: TObject; E: Exception);


как через
Код: pascal
1.
E


получить номер ошибки?
...
Рейтинг: 0 / 0
AppliactionEvents OnException через E код ошибки
    #39741003
zinpub
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Пятница...

Я ж показал...
...
Рейтинг: 0 / 0
AppliactionEvents OnException через E код ошибки
    #39741206
Фотография X-Cite
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: pascal
1.
2.
3.
4.
5.
6.
if E is EOraError then
  case EOraError(E).ErrorCode of
    5:;
    10:;
    20:;
  end;
...
Рейтинг: 0 / 0
AppliactionEvents OnException через E код ошибки
    #39741358
AdamAry
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
X-Cite,
пишет
Код: pascal
1.
[DCC Error] Unit1.pas(82): E2003 Undeclared identifier: 'EOraError'
...
Рейтинг: 0 / 0
AppliactionEvents OnException через E код ошибки
    #39741381
Фотография X-Cite
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Так в uses подключите модуль, где описан этот класс
...
Рейтинг: 0 / 0
AppliactionEvents OnException через E код ошибки
    #39741392
AdamAry
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
X-Cite,
uses OraError;

Всё отменно.
...
Рейтинг: 0 / 0
12 сообщений из 12, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / AppliactionEvents OnException через E код ошибки
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]