Форум: "Основная";
Текущий архив: 2002.10.10;
Скачать: [xml.tar.bz2];
ВнизОбработка исключений в COM+ Найти похожие ветки
← →
seu (2002-10-01 16:36) [0]Сервер приложений представляет собой совокупность ActiveX Library, объединенных в COM+Application с использованием Just_In_Time активации для объектов бизнес-логики.
Например,
TObject1=class(TMTSDataModule, IObject1)
protected
procedure Proc1;safecall;
end;
procedure TObject1.Proc1;
begin
try
......
with CreateComObject(Class_Object2) as IObject2 do
Proc2;
.....
SetComplete;
except
SetAbort;
raise;
end;
end;
TObject2=class(TMTSDataModule, IObject2)
protected
procedure Proc2;safecall;
end;
procedure TObject2.Proc2;
begin
try
......
<код, генерирующий исключение>
.....
SetComplete;
except
SetAbort;
raise;
end;
end;
Если на клиенте вызывается метод Proc2 объекта Object2, то обработчик ошибок на стороне клиента получает нормальное содержание ошибки. Если же с клиента вызывается метод Proc1 объекта Object1, то содержание ошибки - "OLE error 800A0E7C".
Хотелось бы услышать какие-нибудь соображения по возможности получения на клиенте "читаемых" сообщений об ошибке.
← →
seu (2002-10-01 19:38) [1]?
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.10.10;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c