Fórum Outra duvida simples #203966
03/01/2004
0
Onde:
codigo tipo N *
apto tipo A
[size=9:8059836524]O que eu queria era colocar no evento onexit do dbedit2 alguma coisa tipo
if dbedit2.text = tabela[´apto´] //se for digitado um apto que já exista na tabela ele de uma mensagem[/size:8059836524]
mesagem (´ apto já existe para esse codigo´ )
Tipo o key violation do codigo *
Obrigado
Wagner
Curtir tópico
+ 0Posts
03/01/2004
Demian Soares
mssagebox(´Apto ja existe...verifique..... e por ai vai...
Gostei + 0
03/01/2004
Wagner
O problema do locate e que ele localiza o registro que ja existe e mostra na tela eu queria alguma que que informasse que o apto já existe e voltasse o foco para o dbedit2 para que usuario informasse novo apto mais com o resto dos campos limpos.
funciona legal mais fica com o registro localizado na tela
if tabela.locate(´apto´,dbedit2.text,[lopartialkey]) then
Application.messagebox(´Esse Nº de apartamento já existe!´,´Confirmação´,mb_ok+mb_iconError);
dbedit2.SetFocus;
Tem outra forma ou uma forma de evita isso
Gostei + 0
04/01/2004
Wagner
Gostei + 0
04/01/2004
Marcrv2
lblCPF.Caption := edtCpf.Text;
qryVerCPF.Close;
qryVerCPF.Params[0].Value := lblCPF.Caption;
qryVerCPF.Open;
if qryVerCPF.RecordCount > 0 then
begin
Application.MessageBox(´CPF já cadastrado!´, ´Aviso´,
MB_ICONINFORMATION + MB_OK);
edtCpf.SetFocus;
end;
muito simples, na saída do dbeditcpf coloco este código com um label recebendo o valor digitado aí ele vai verificar se já existe o cpf cadastrado, se existir da a mensage.
Agora é contigo, boa sorte
Marcelo - marcrv@terra.com.br
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)