mostrar registros repetidos
 

utilizo interbase 5. Mediante una consulta quiero mostrar todos los registros repetidos(por column):

tengo la siguente tabla:
cod,nombre

1,pedro
2,juan
3,maite
4,pedro
5,ana
6,jon
7,ana

Quiero que me muestre sin utilizar condición cod='ana' y/0 cod='pedro':

1 pedro
4 pedro
5 ana
7 ana

Saludos

Código SQL [-]
select distinct campo1, campo2
FROM tabla1 WHERE campo1 In (SELECT campo1 FROM
tabla1 As Tmp GROUP BY campo1 HAVING Count(*)>1)
ORDER BY campo1;

pero como puedo hacer esto mismo con dos registros
 

A|B
A|C
A|B
C|D
A|C

mostrar un tabla asi:
A|B
A|B
A|C
A|C
por favor ayudenme les agradesco de antemano.

Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración.