Cita:
Empezado por DriverOp
Gracias por responder pero ZEOS no genera una EOleException.
|
Ok, pero se puede declarar la variable
"E" de tipo
"Exception" que es la clase Madre de todas las clases que se encargan de las Excepciones en delphi y así lograr lo que uno quiera; sea cual sea el tipo y Clase de excepcion que se genere igual lo capturás
; eso es lo bello del polimorfismo.
Algo así:
Código Delphi
[-] try
except
on E:Exception do begin
MessageDlg(Format('Error: %s Codigo: %d', [E.Message, E.ErrorCode]), mtError, [mbOK], 0);
end;
end;
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7