Qual a melhor forma de gravar dados? (Paradox)

Delphi

06/05/2004

Pessoal tomará que eu consiga explicar de uma forma clara, bem preciso da seguinte ajuda:

Possuo as tabelas:

tb_produtos.DB - Tabela dos Produtos
tb_clientes.DB - Tabela dos Clientes
tb_prepedido.DB - Tabela dos Pré-Pedidos

No form tenho:

Edits:

edt_produto
edt_cliente
edt_qtd

Botões:

btn_add

DBGrids:

Grade


OK. Será informado pelo usuário no edt_produto o Código do produto, no edt_cliente o código do Cliente e no edt_qtd a quantidade do produto que ele quer. Quando clicado no botão Adicionar ele pega os dados digitados e busca o produto e o cliente pelo codigo informado e adiciona na grade os dados:

Da tabela Produtos ( tb_produtos)

- Código do Produto (´Codigo´)
- Nome do Produto (´Nome´)
- Valor do Produto (´Valor´)
- Numero de pontos do produto (´Pontos´)

Da tabela clientes ( tb_clientes)

- Código do Cliente (´Codigo´)
- Nome do Cliente (´Nome´)

Da edit ( edt_qtd )

- Quantidade do produto informada.


Como seria a forma mais fácil de localizar e registrar estes dados ?

Obrigado mesmo pela ajuda de todos que responderem !!!
Abraços
Junior

[b:ed4dd4983a][color=red:ed4dd4983a]Título editado pelo Moderador (AZ) - Removido: ´pessoal me ajudem nessa por favor. Paradox´[/color:ed4dd4983a][/b:ed4dd4983a]


Koringa

Koringa

Curtidas 0

Respostas

Rodolpho123

Rodolpho123

06/05/2004

Olá Koringa,

Use o método Locate para sua busca. Ex:
if tb_produtos.Locate(´campo_produto´,edit_produto.text,[]) = true then
      ShowMessage(´Seu produto foi encontrado e adicionado com sucesso´)
      else
      ShowMessage(´Não foi inserido o seu produto, pois não foi encontrado´);


Eu costumo usar o Locate junto com if-then-else, pois posso manter a integridade dos dados, evitando vários tipos de comflitos.


GOSTEI 0
POSTAR