Te pongo un ejemplo, este código lo escribes en el evento OnPostError de tu tabla que es donde se detectarán los errores de registros duplicados.
Código Delphi
[-]
procedure TForm1.Table1PostError(DataSet: TDataSet;
E: EDatabaseError; var Action: TDataAction);
begin
if EIbInterbaseError(E).IBErrorCode=isc_unique_key_violation then
begin
ShowMessage('Registro duplicado');
Action:=daAbort;
end;
end;
En este caso el mensaje se muestra si se produce un error de tipo
isc_unique_key_violation, existen otras constantes definidas para controlar el resto de los errores.
Saludos