[[coso]]

Hola, lo suyo seria tratar de coger la excepcion por id repetido

Código Delphi [-]
var
        fet : boolean;
        id : integer;
begin
       fet := false;
       while not fet do
       begin
                 id := strtoint(Edit1.Text); 
                 try 
                    Tabla.Append;
                    Tabla.FieldValues['id'] := id;
                    ...
                    Tabla.Post; 
                    fet := true;
                except  
                    ShowMessage('identificador repetido');
                    Edit1.SelectAll;
                    Edit1.SetFocus;
               end;       
       end;
end;

algo asi. igualmente este tema esta bastante tratado. si usas el buscador del foro seguramente encontraras otros mensajes