| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
lucasdfp Novato

Registrado: Terça-Feira, 14 de Julho de 2009 Mensagens: 37
|
Enviada: Qua Nov 25, 2009 8:20 am Assunto: Verificação de Registros |
|
|
Bom dia pessoa,
Sei que parece meio bobo, mais está dando erro agora no meu...
Eu quero fazer a verificação de RG e CPF, ou seja, verificar se eles estão cadastrados. Porém eu estou usando IBExpert e Firebird e quando inicio um cadastro clico em Novo para começar a inserir os dados...coloquei a verificação no evento onExit porem como está inserindo na tabela ele acusa existente....por exemplo..tenho na tabela 1,2,3,4,5,6,7,8,9 e eu começo a digitar 10 após eu sair do edit ele acusa tbm pois está sendo inserido automaticamente....como eu faço essa verificação?...
Obrigado |
|
| Voltar ao Topo |
|
 |
adriano_servitec Colaborador

Registrado: Sexta-Feira, 30 de Janeiro de 2004 Mensagens: 17618
|
Enviada: Qua Nov 25, 2009 8:25 am Assunto: Re: Verificação de Registros |
|
|
| lucasdfp escreveu: | Bom dia pessoa,
Sei que parece meio bobo, mais está dando erro agora no meu...
Eu quero fazer a verificação de RG e CPF, ou seja, verificar se eles estão cadastrados. Porém eu estou usando IBExpert e Firebird e quando inicio um cadastro clico em Novo para começar a inserir os dados...coloquei a verificação no evento onExit porem como está inserindo na tabela ele acusa existente....por exemplo..tenho na tabela 1,2,3,4,5,6,7,8,9 e eu começo a digitar 10 após eu sair do edit ele acusa tbm pois está sendo inserido automaticamente....como eu faço essa verificação?...
Obrigado | Primeiramente fica mais facil de ajudar se vc postar o método que usa para inserir;
Segundo, a maneira que eu utilizo para verificar se ja existe registro cadastrado é fazer um select pasando a variavel para o paramentro e usando um is not empty para ver se existe na tabela. _________________ Jogo seu smartphone? Acesse o link e confira.
https://play.google.com/store/apps/details?id=br.com.couldsys.rockdrum
https://play.google.com/store/apps/details?id=br.com.couldsys.drumsetfree |
|
| Voltar ao Topo |
|
 |
lucasdfp Novato

Registrado: Terça-Feira, 14 de Julho de 2009 Mensagens: 37
|
Enviada: Qua Nov 25, 2009 8:37 am Assunto: |
|
|
| para inserir eu clico é... dm.tabela.insert |
|
| Voltar ao Topo |
|
 |
lucasdfp Novato

Registrado: Terça-Feira, 14 de Julho de 2009 Mensagens: 37
|
Enviada: Qua Nov 25, 2009 8:40 am Assunto: |
|
|
clico em NOVO...
comando
dm.tabela.insert |
|
| Voltar ao Topo |
|
 |
lucasdfp Novato

Registrado: Terça-Feira, 14 de Julho de 2009 Mensagens: 37
|
Enviada: Qua Nov 25, 2009 9:32 am Assunto: |
|
|
| alguem sabe? |
|
| Voltar ao Topo |
|
 |
adriano_servitec Colaborador

Registrado: Sexta-Feira, 30 de Janeiro de 2004 Mensagens: 17618
|
|
| Voltar ao Topo |
|
 |
lucasdfp Novato

Registrado: Terça-Feira, 14 de Julho de 2009 Mensagens: 37
|
Enviada: Qua Nov 25, 2009 10:43 am Assunto: |
|
|
no onexit eu uso o locate
dm.tabelacampo.locate('',edit,[]);
o problema é que ele sempre acha e quando nao acha ele posiciona a tabela em algum registro...
como eu faço pra qdo ele nao achar ele continuar cadastrando e nao posicionar a tabela em algum registro?
valeu |
|
| Voltar ao Topo |
|
 |
adriano_servitec Colaborador

Registrado: Sexta-Feira, 30 de Janeiro de 2004 Mensagens: 17618
|
Enviada: Qua Nov 25, 2009 10:52 am Assunto: |
|
|
| lucasdfp escreveu: | no onexit eu uso o locate
dm.tabelacampo.locate('',edit,[]);
o problema é que ele sempre acha e quando nao acha ele posiciona a tabela em algum registro...
como eu faço pra qdo ele nao achar ele continuar cadastrando e nao posicionar a tabela em algum registro?
valeu | Bom au deduzi que vc esta udando EDITS ja que não postou quais componente esta usando.
Faça um select no onexit então
| Código: | select * from tabela
where campo = :parametro
parambyname('parametro').asstring := edit.text;
open;
if not isempty then
begin
messagedlg(edit.text+' '+já cadastrado no banco de dados, mtinformation, [mbok], 0);
edit.setfocus;
//continue ou finalize o bloco
end;
end;
|
_________________ Jogo seu smartphone? Acesse o link e confira.
https://play.google.com/store/apps/details?id=br.com.couldsys.rockdrum
https://play.google.com/store/apps/details?id=br.com.couldsys.drumsetfree |
|
| Voltar ao Topo |
|
 |
lucasdfp Novato

Registrado: Terça-Feira, 14 de Julho de 2009 Mensagens: 37
|
Enviada: Qua Nov 25, 2009 2:28 pm Assunto: |
|
|
| Amigão deu certo, mais eu fiz de outra forma...eu estava errando pois como eu estava insereindo direto no ttable sempre verificava que já existia, eu então criei um query e fiz uma consulta simples através da query e deu certo...valeu ae |
|
| Voltar ao Topo |
|
 |
adriano_servitec Colaborador

Registrado: Sexta-Feira, 30 de Janeiro de 2004 Mensagens: 17618
|
Enviada: Qua Nov 25, 2009 2:41 pm Assunto: |
|
|
| lucasdfp escreveu: | | Amigão deu certo, mais eu fiz de outra forma...eu estava errando pois como eu estava insereindo direto no ttable sempre verificava que já existia, eu então criei um query e fiz uma consulta simples através da query e deu certo...valeu ae | Só um detalhe, acompanho a algum tempo o forum, e vejo que muitos programadores utilizam o TTable, para criar projetos, até que é valido, pois se o componente esta ali e conecta com o banco, ok...Mas isso para um sistema local bem basico é o suficiente, mais se for pensar mais além, tipo um sistema client/server, ai amigo, aconselho jamais usar o TTable. _________________ Jogo seu smartphone? Acesse o link e confira.
https://play.google.com/store/apps/details?id=br.com.couldsys.rockdrum
https://play.google.com/store/apps/details?id=br.com.couldsys.drumsetfree |
|
| Voltar ao Topo |
|
 |
lucasdfp Novato

Registrado: Terça-Feira, 14 de Julho de 2009 Mensagens: 37
|
Enviada: Qua Nov 25, 2009 2:43 pm Assunto: |
|
|
| Opa valeu pela dica, eu faço sistemas básicos, por isso que uso o TTable...apenas sistemas internos da empresa aqui. |
|
| Voltar ao Topo |
|
 |
|