Обработка исключений в COM+ [D6, Win2k]
seu © (2002-10-01 16:36:00)
Сервер приложений представляет собой совокупность 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:00) [1]
?
Наверх 
ЧАТ |
Орешник |
|
