как ловить ошибки в COM-е

← →
Dysan © (2004-03-12 10:27) [0]

Скажите как централизованно ловить в COM ошибки ?
как это делаеться в обычных прогах Application.OnException:=Процедура

← →
Polevi © (2004-03-12 10:31) [1]

никак

← →
Erik © (2004-03-12 10:47) [2]

Неправда можно! Вопрос конечно, что поймаеш, но, что поделаеш такая суюба у COM. Поробуй воспользоватся бублиотекой JCL, там есть процедуры JclStartExceptionTracking;
JclAddExceptNotifier(ExceptionMapper.LogException);
ExceptionMapper - это свой класс, но есть толковый пример. Запускай его перед TComponentFactory.Create

Если твои классы написаны на Delphi и являются наследниками TComObject, то можно делать следующее:
1. Переопределить у твоего класса метод
function SafeCallException(ExceptObject: TObject; ExceptAddr: Pointer): HResult; override;
и в нем что-нить делать с Exception"ами, возникающими в методах твоего класса.
2. Установить твоему классу
property ServerExceptionHandler: IServerExceptionHandler
3. Подменить функцию
function HandleSafeCallException(ExceptObject: TObject; ExceptAddr: Pointer; const ErrorIID: TGUID; const ProgID, HelpFileName: WideString): HResult;

как ловить ошибки в COM-е Найти похожие ветки