Manejo Excepciones FIREDAC

[Jose Roman]

Cordial saludo,

Tengo Delphi XE8 y antes utilizaba ZEOSLib en el evento OnPost capturaba los codigos de error asi:

Código Delphi [-]
 if E is EZDatabaseError then
     case EZDatabaseError(E).ErrorCode of
       1062 : wMain.msgMain.MessageDlg('LOGIN ya existe',mtError,[mbOK],0);
     end;
  Action := daAbort;

Pero no he podido realizar esto con FIREDAC, alguien sabe como?

Muchas gracias.