Problema manejando excepciones

[[David]]

Tengo una instrucción para copiar datos de una tabla a otra , lo que pasa es que la tabla 1 , admite artículos repetidos , la tabla 2 (que se copia de la tabla 1 , no admite artículos repetidos , da key violetion , cuando repite uno).

bien , tengo una instrucción

Código Delphi [-]

Try

with tabla2 do
begin

    First;
     while not eof do
       begin
         insertaarticulo('tabla1') // procedimiento donde va a por los articulos de la tabla1.
         Next;
       end;

end;

except;
end; // end del except , por si se encuentra una excepción , no haga nada.

El caso es que si en la tabla1 , tengo esta lista .

Articulo1
Articulo2
Articulo1
Articulo3

pues copia el articulo1 , el articulo2 y luego al encontrar el articulo1 otra vez , pues key violation , y se para , yo quiero que si encuentra el articulo1 , y esta repetido y es una key violation , se lo salte , pero luego si me añada el articulo 3 .

Por que tal y como tengo el código , me sale esto en la tabla2 :

Articulo1
Articulo2

y ya esta ....