Delphi - problemas con consultas a sql

Tengo una aplicacion la cual inserta unos registros a una base de datos, para insertar: nombre, clave, telefono, contrasena. eso ya lo puedo hacer, ya inserta, pero como le hago para que al dar click en el boton de alta, me cheke si el nombre ya esta en la base de datos, entonces cuando cheque que si esta repetido me mande un ShowMessage('ya estas registrado'). como puedo hacer que busque el nombre en la base y con un if o no se con que me compare si ya esta o no. espero su pronta ayuda. gracias.

el acceso a la base de datos, que esta en sql server, lo hago con un TQuery y un TDataSource.

Lo que generalmente yo uso es lo siguiente, me declaro una variable string, y a esa variable le pongo una consulta Select para el campo clave de la tabla, por ejemplo en tu caso, con el DNI o Clave, como tu introduciras todos los datos supongo que en EDITs, pues hago lo siguiente:

a:= 'select * from MiTabla where ClaveDe_MiTabla='''+editX.text+'''';
QueryX.close;QueryX.sql.Clear; QueryX.sql.add(a); QueryX.open;
if (QueryX.IsEmpty) then
begin....
insercion
end
else
begin
showmessage('Ya se encuentra');
end;

la sentencia de QUERYX.ISEMPTY mira si despues de abrir el QueryX esta vacio o no, si esta vacio entonces despues del begin hago la inserción en la base de datos, sino, manda el mensaje que pusiste de 'Ya se encuentra' o el que tu quieras. A mi me funciona asi perfectamente, supongo que habra otras formas de hacerlo no se, bueno espero haberte servido de ayuda, un saludo.

Gracias, si me sirvio mucho esto que pusiste, te lo agradesco