Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

как получить код исключения в запросе? ADO+sql sever [MSSQL]


ther ©   (2010-02-03 20:33:00) 

Драсте
нужно отлавливать все эксепшны при запросах через ADO..дабы не помещать каждый запрос в try..except положил на форму ApplicationEvents и все эксепшны обрабатываю там...так вот при исключениях функция
GetLastError возвращает 0
EOleException(e).ErrorCode - нижний предел типа integer тоесть -21... и тд(не помню)
EOleException(e).Message - выводит саму ошибку (текст)
Так вот мне нужно получать только коды исключений...как их получить?


Сергей М.   (2010-02-05 09:46:00) [1]


> ther ©   (04.02.10 19:50) [3]


Ты так и не понял, о чем я веду речь.

Код ошибки, возвращаемый ф-цией GetLastError, не имеет ничего общего ни с Error.NativeError ни с EOleException.ErrorCode.

Это как раз и прописано во всех талмутах.


ther   (2010-02-04 19:50:00) [2]

в общем себе же и отвечу..
в общем в ADOConnection есть событие ExecuteComplete и код ошибки можно получить через Error.NativeError


12   (2010-02-04 09:05:00) [3]

Что значит коды? Всю таблицу "число - буквы" что-ли?
...
Если происходит ошибка, IDispatch можетвернуть полезную информацию об исключении, включая источник исключения, код ошибки, описание ошибки, файл справки и идентификатор его контекстно-зависимой справки. EOleException собирает эту информацию и включает в сообщение, генерируемое конструктором CreateHelp, описание ошибки и ее номер (если возможно).

.....


> Сергей М. ©  

постоянно при работе с ADO
    try
     ADOConnection1.ConnectionString:='qwertyuiop';
     ADOConnection1.Open;
    except
     on E:Exception do
     begin
       i:=GetLastError;
       showmessage(inttostr(i));
       showmessage(e.Message);
     end;
    end;
i=0


Сергей М.   (2010-02-03 21:10:00) [4]


> при исключениях функция
> GetLastError возвращает 0


Интересно. и в каком же Талмуте завещан ненулевой рез-т ызова GetLastError "при" исключениях ?)


Наверх

Титульная страница Поиск, карта сайта Написать письмо