[firebase-br] RES: Ref. Detectar campo existente em tabela

[Paulo Cesar]

Ola Osmar

Eu tenho uma função básica que coloquei no botão incluir de um castro que eu
fiz... é mais ou menos assim..

O campo é o CPF

procedure TfrmCadCli.BitBtn1Click(Sender: TObject);
var CPF:string;
begin
     CPF := ''; // inicia definindo uma string vazia
     if InputQuery('Digite o Nº', 'CPF', CPF) then
         if tblClientes.Locate('CPF', CPF,
             [loCaseInsensitive, loPartialKey]) then
         begin
             ShowMessage('CPF Já Existe!');
             Exit

         end;
             tblClientes.Refresh;
             tblClientes.Insert;
             tblClientes.fieldbyname('CPF').AsString:=CPF;
             dbnome.SetFocus;
end;

-----Mensagem original-----
De: lista-bounces em firebase.com.br [mailto:lista-bounces em firebase.com.br] Em
nome de Omar Haddad
Enviada em: sábado, 9 de maio de 2009 20:39
Para: FireBase
Assunto: [firebase-br] Ref. Detectar campo existente em tabela

Boa noite

Amigos, alguém sabe como detectar se um campo ja existe numa tabela ?
Abraço

-- 
Att.
Omar Marques Haddad
Analista de Sistemas Sênior
______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para saber como gerenciar/excluir seu cadastro na lista, use:
http://www.firebase.com.br/fb/artigo.php?id=1107
Para consultar mensagens antigas: http://firebase.com.br/pesquisa