Verificar Nome antes de Gravar e Editar

[Rafael Gaga 0]

Olá Pessoal http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

 

Estou no meu 1º projeto de delphi e estou com alguns problemas :wacko: dei uma pesquisada aqui no forum mas nao encontrei algo semelhante.

 

1º - Preciso criar uma função que verifique se o nome / descrição cadastrado já existe no banco de dados, para ser usado em campos como login (Cad Usuario) descricao (Cad Grupo de Produtos) etc.

Só que tenho a opção aterar cadastro, e ai complica um pouco pq o usuario pode alterar para um nome ja existente.

Estou usando TDBEdits e conexao ZTable (ZEOS) e tbm ZQuery + Mysql.

 

 

Obrigado pela atenção.

 

Abraços http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[marcio.theis 3]

Precisa somente fazer uma consulta simples no BD, algo como:

 

select *
from tabela where tabela.descricao = 'XXX'

 

Quando estiver alterando, basta adicionar mais uma validação, algo como:

 

select *
from tabela where tabela.descricao = 'XXX' and tabela.codigo <> YYY

 

Ficando:

 

qry.Close;
qry.SQL.Clear;
qry.SQL.Add('select *');
qry.SQL.Add('from tabela');
qry.SQL.Add('where tabela.descricao = ''' + descricao + '''');
if (alterando) then
	qry.SQL.Add('and tabela.codigo <> ' IntToStr(codigo));
qry.Open;