Ver Mensaje Individual
  #5  
Antiguo 22-12-2010
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Reputación: 17
rgstuamigo Va por buen camino
Arrow

Cita:
Empezado por DriverOp Ver Mensaje
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
//instruccion a ejecurar
except
     on E:Exception do //<- Mi objeto "E" es de tipo "Exception" 
      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
Responder Con Cita