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

24/12/2005

0

utilizo o paradox e gostaria de fazer a seguinte rotina...

antes de gravar o novo arquivo no banco de dados, o sistema verifica se já não existe um arquivo com este nome...


Adelor Silva

Adelor Silva

Responder

Posts

24/12/2005

Adelor Silva

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;


Responder

24/12/2005

Edilcimar

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


Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar