com+中如何作错误处理？

Question

Delphi中错误处理格式为：  
  TRY  
    {执行过程}  
  EXCEPT  
    {错误处理过程}   
  END;  但是在COM+组件中，执行过程出了错，不到EXCEPT中  
进行错误处理过程，但可以SHOWMESSAGE提示，不知大家  
如何解决？帮我一把！  

Answer 1

在组件中这么写：
方法名：Method1 
  TRY  
    {执行过程}  
  EXCEPT  
    {错误处理过程} 
    Raise;
  END;  客户端：  TRY  
    Method1;
  EXCEPT  
    {错误处理过程}
    on E: Exception do
    begin
      ShowMessage(E.Message);
    end;
  END;  

Answer 2

我说你们会不会呀?
COM+
procedure thod(var err:widestring);
try
...
err:='ok';
except
on E: Exception do
err:=e.message;
end;client:
var er:widestring;
begin
method(er);
if er<>'ok' then
showmessage(er);
end;http://expert.csdn.net/Expert/topic/1227/1227094.xml?temp=.8717462
我的文单