Busca SQL, achando registro mostrar mensagem

O ideal e q fosse o cpf ou cnpj mas...
primeiro essa checagem tem q ser feita somente quando estiver incluindo:
If (Tabela.State <> dsInsert) or (ActiveControl = <Botão Cancelar>) Then
Exit; {caso o estado for diferente de inserção, ou clique no botão cancelar, saia}

Query.Close;
Query.SQL.Clear;
Query.SQL.Add(´select <NOME DO CAMPO> from <TABELA>´);
Query.SQL.Add(´where <NOME DO CAMPO> = :Nome´);
Query.ParamByName(´Nome´).AsString = Table1NOME.AsString;
Query.Open;
If not Query.FieldByName(´<NOME DO CAMPO>´).IsNull Then {se o conteudo do campo não for nulo é pq já esta cadastrado}
begin
Query.Close;
Edit ou DBEdit.SetFocus; {Foco no campo do Nome}
Raise Exception.Create(´Nome já cadastrado, verifique !´); {provoca uma parada crítica no programa dando mensagem}
end;
Query.Close;