Tratamento de falha na conecção Oracle via TDataBase

Quando uso um TDataBase1 para fazer a conecção a qualquer falha ele responde sempre o mesmo erro
ORA-01012- NOT LOGED ON

mas gostaria de tratar os possíveis erros :

senha inválida
host inválido
bd aberto em mode exclusive
msg particular (tenho uma trigger de conect que impede um user de se logar em maq. diferentes)

alguém sabe como tratar a msg real logando via DataBase.

Oracle 8.16
Delphi 5 (TDataBase)