Como capturar el error sql desde Zeos?
 

Holas!

Esa es mi pregunta: tengo un programita en Delphi 5 que se conecta a un servidor Mysql 4 usando el componente Zeos.
Ahora bien, el programa se encuentra enviando datos locales al servidor remoto constantemente. La idea es que si un dato se repite, se lo salte y continúe con el siguiente, o sea, que no se caiga todo el proceso.

Yo estaba usando el TRY EXCEPT para captar la ocurrencia del error.
Con "on E: Exception do..." dentro del EXCEPT es mejor aún.
Pero aun no logro saber qué propiedad, función o lo que sea que traiga ZEOS me retorna el código del Error que Mysql devuelve al producirse un error.

Por ejemplo, el clásico error de key duplicada es el codigo 1062. ¿Cómo puedo obtener ese numerito desde Delphi para así manejar de mejor manera mi programita?

Eso es. Muchas gracias de antemano! :D

Saludos!!

Hola quinqui!
La forma de manejar el error sería la siguiente:

Código Delphi [-]
procedure TForm1.ZqMasterPostError(DataSet: TDataSet; E: EDatabaseError; 
  var Action: TDataAction); 
begin 
  if e is EZDatabaseError then 
  begin 
    case EZDatabaseError(E).ErrorCode of 
      1062 : begin 
        Showmessage ('Ya existe una key con este número.'); 
      end; 
     else 
        Showmessage ('Se ha producido un error al intentar guardar el registro:' + 
            chr(13) + chr(13) + inttostr(EZDatabaseError(E).ErrorCode) + 
            ' -> ' + E.Message); 
    end; 
    Action := daAbort; 
  end; 
end;

Como podrás notar, haciendo EZDatabaseError(E).ErrorCode podés obtener el código de error.

Saludos!