Falha castastrófica Delphi

[Matheus josé moreira]

Alguém ja viu essa situação:
tenho tratamento de exceção nos serviços , porém em um deles quando uma exceção é gerada , em vez de gerar a exceção , gera erro falha castastrofica, isso para qualquer exceção gerada no sistema.
Através de log , tentei identificar e não consegui , so descobri que a mensagem que chega é a original 
trecho do codigo:
 except
      on e: exception do
      begin
        DB.Rollback;
        Log.Trace(e.Message);
        raise Exception.Create(ERRO_APROVACAO_PEDIDO + e.Message);
      end;
    end;
log do arquivo : Estoque (-2,000) insuficiente para este produto! (Id produto: 54 - AGUA MINERAL SEM GAS) .
na tela : Remote error: Falha catastrófica

 

[BigWings]

Falha catastrófica é um access violation num processo remoto.

Provavelmente tem algo no tratamento das exceções que esta gerando o AV.

Da forma abaixo também ocorre erro?

except
  on e: exception do
  begin
    DB.Rollback;
    Log.Trace(e.Message);
    raise;
  end;
end;

 

[Matheus josé moreira]

24 minutos atrás, BigWings disse:

Falha catastrófica é um access violation num processo remoto.

Provavelmente tem algo no tratamento das exceções que esta gerando o AV.

Da forma abaixo também ocorre erro?

except
  on e: exception do
  begin
    DB.Rollback;
    Log.Trace(e.Message);
    raise;
  end;
end;

Sim gera falha castatrofica, só gera quando possui o Raise , tentei com showmessage(e,Message) rodando como aplicação a mensagem aparece , mas o showmessage foi apenas teste, pois não posso colocar showmessage no serviço 

 

[Matheus josé moreira]

Consegui encontrar o erro.
Esse serviço veio de um refatoração de um server com tecnologia antiga que usava socket.
nas chhamadas dos metodos tinha o "safecall;"
Foi remover eles que parou o erro , obrigado pela ajuda 

[BigWings]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.