Ler o Banco de Dados e Verificar se o arquivo já existe

ai vai uma parte do código fonte...

procedure TCadBrChata.Button2Click(Sender: TObject);
begin
if Trim(DBEdit1.Text) = ´´ then
begin
DBEdit1.SetFocus;
ShowMessage(´Digite a Descrição da Barra Chata´);
exit;
end;
DataModule1.TB_Tab_Br_Chata.Post;
DBEdit1.SetFocus;
end;

na realidade o que vc fez foi verificar se o nome é nulo, se não for então vc está tentando gravar, mas se o nome realmente existir vc não está fazendo nada, então faça o seguinte, se o nome não for nulo dê um locate (ou algo semelhante) e aí então se não achar vc poderá fazer a inclusão do referido registro, e caso o mesmo seja encontrado faça algo para verificar se o mesmo é idêntico àquele que vc está tentando inserir, pois José da Silva eu tenho a leve impressão de que existe mais de 1, assim como pilha tipo AA existe mais de 1 marca