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

Registrado: Quarta-Feira, 25 de Junho de 2008 Mensagens: 36
|
Enviada: Qui Dez 25, 2008 4:57 am Assunto: Inserir registro e pesquisar ao mesmo tempo |
|
|
| Estou desenvolvendo um programa para controle de supermercado. Quando o caixa ler o código de barras dos produtos com o leitor se o produto não tiver cadastrado quero que apareça uma mensagem produto não cadastrado, por favor cadastre o produto. |
|
| Voltar ao Topo |
|
 |
Tchock Colaborador


Registrado: Domingo, 18 de Julho de 2004 Mensagens: 1242
|
Enviada: Sáb Dez 27, 2008 1:58 am Assunto: |
|
|
Boa Noite, Giovanna.
é so vc fazer a busca na sua tebela tipo:
| Código: | if FrmVenda.db_estoque.RecordCount<1 then
begin
Erro('Produto não cadastrado no estoque');
EditCODIGO.SetFocus;
FrmVenda.db_estoque.Close;
Exit;
End; |
|
|
| Voltar ao Topo |
|
 |
Giovanna Novato

Registrado: Quarta-Feira, 25 de Junho de 2008 Mensagens: 36
|
Enviada: Ter Dez 30, 2008 1:41 am Assunto: |
|
|
| Tchock escreveu: | Boa Noite, Giovanna.
é so vc fazer a busca na sua tebela tipo:
| Código: | if FrmVenda.db_estoque.RecordCount<1 then
begin
Erro('Produto não cadastrado no estoque');
EditCODIGO.SetFocus;
FrmVenda.db_estoque.Close;
Exit;
End; |
|
Já tentei usar ese código mas desaparece os registros da tabela. Acho que falta um código pra terminar a pesquisa e mostrar todos os registros da tabela. |
|
| Voltar ao Topo |
|
 |
pestana Colaborador

Registrado: Sábado, 25 de Junho de 2005 Mensagens: 3147 Localização: Araras-SP
|
Enviada: Ter Dez 30, 2008 9:25 am Assunto: |
|
|
O problema deve estar como você esta realizando essa pesquisa, talvez a pesquisa não esta satisfazendo as condições que você deseja, por isso que não retorna os registros na query. _________________ Ao invés de ficar desanimado no que deu de errado, olhe para frente, aprenda com os erros e veja o que ainda pode ser feito. A determinação e a persistência é uma das etapas para o sucesso. |
|
| Voltar ao Topo |
|
 |
|