Ver Mensaje Individual
  #5  
Antiguo 08-07-2013
elrodrix elrodrix is offline
Miembro
NULL
 
Registrado: nov 2011
Posts: 32
Reputación: 0
elrodrix Va por buen camino
Cita:
Empezado por Neftali Ver Mensaje
La captura de errores de hacer de la forma estandard (try..except); En las capturas tendrás que averiguar los errores pertenecientes a ADO/MySQL (para ello puedes utilizar la clases de la excepción, ya que las de ADO son EOLEException) y en ese caso derivar el tratamiento a un procedimiento para que dependiendo del código de error (que te proveen las EOLEException) sepas cueles son por problemas de conexión del resto de errores.
Muchas gracias.

Trato de hacer algo asi, en el evento BeforeOpen de un AdoStoredProc:

Código Delphi [-]
procedure TDM1.SPoffconsulta1BeforeOpen(DataSet: TDataSet);
begin
  try
            AdoConnection1.Connected:=True;
          except
            on E: Exception do
              begin
                ShowMessage(E.ClassName + ' Ocurrio un error : ' + E.Message);
              end;
          end;
end;

Pero no consigo ningun resultado. Sigue enviando mensajes de error MYSQL



Seguire investigando y probando. Gracias y saludos
Responder Con Cita