[Resolvido] DbGrid.

[PedroInfoTec 0]

Olá galera, sou novato em delphi estou precisando de ajuda... estou com muita dificuldade na criação de uma tela de venda para o meu sistema de Gerenciamento de uma loja de informatica....

 

Eu tenho as Seguintes Tabelas

 

CREATE TABLE Venda (
  CodVenda INTEGER  NOT NULL,
  CodCliente INTEGER  NOT NULL  ,
  Data_Hora_Venda DATETIME  NOT NULL  ,
  Preco_Unitario_Produto REAL  NOT NULL  ,
  Fabricante_Produto VARCHAR(40)  NOT NULL	,
PRIMARY KEY(CodVenda)  ,
  FOREIGN KEY(CodCliente)
	REFERENCES Cliente(CodCliente));
GO


CREATE TABLE Itens_Da_Venda (
  CodItensDaVenda INTEGER  NOT NULL,
  CodVenda INTEGER  NOT NULL  ,
  CodProduto INTEGER  NOT NULL  ,
  Preco_Venda REAL  NOT NULL  ,
  Qtd_Venda INTEGER  NOT NULL	,
PRIMARY KEY(CodItensDaVenda)	,
  FOREIGN KEY(CodProduto)
	REFERENCES Produto(CodProduto),
  FOREIGN KEY(CodVenda)
	REFERENCES Venda(CodVenda));
GO

Em Baixo tem os Itens da Venda que vão ficar num DBGRID que vair ter os campos Produto , Qtde e Valor não estou conseguindo adicionar os produtos na DBGRIDE e da um valor total a venda...

 

 

Alguém poderia me ajudar Agradeço! :rolleyes:

[Maikel Scheid 1]

Ola

 

Isto que você está querendo fazer é um insert "master/detail" ou mestre detalhe onde você tem uma tabela mestre (Vendas) e vários itens detalhe (itens da venda) para esta unica tabela/registro mestre (vários itens para 1 venda).

 

Creio que esteja usando dbExpress, veja alguns tópicos relacionados que lhe ajudarão com o procedimento:

 

http://www.firebase.com.br/fb/artigo.php?id=299

http://www.devmedia.com.br/articles/viewcomp.asp?comp=4405 [video-aula]

http://www.planetadelphi.com.br/dica/5346/...com%20dbexpress

http://www.planetadelphi.com.br/download/2...l-com-dbexpress [Exemplo p/ download]

 

Creio que isso irá lhe ajudar.. qualquer coisa... post suas duvidas.

 

Att

[PedroInfoTec 0]

Olá, Muito obrigado pelo post, mais na verdade minha dúvida é como adicionar os produtos na grid manualmente e mostra um valor total dos produtos adicionados...

Eu consegui fazer com StringGrid so que ficou muito ruim.. no delphi tem um exemplo semelhante ao que eu quero fazer Exemplo : C:\.....\Borland\Delphi?\Demos\DB\Mastapp

[Daniel Sanches 0]

olá !! vou tentar te dar uma dica pra ver se te clareia as idéias !! rsrsrs..

 

você tem a tabela de VENDA (principal) e a tabela de ITENS_VENDA(filha)... as 2 são ligadas por CodVenda->CodVenda...

 

na principal, você faz seu form de inclusão normalmente... colocando um grid na tela ou como quiser ...

 

você só tem que se preocupar com a tabela filha de forma que sempre que o usuário for gerar uma nova venda, os itens sejam zerados ...é só você fazer o filtro na tabela filha desta forma:

 

query.sql.text:= 'select * from ITENS_VENDA where ITEMS_VENDA.CodVenda = :P_CODVENDA';
query.parambyname('P_CODVENDA').value:= queryVendaCODVENDA.value;
query.open;

então sempre que você for incluir um novo registro no cadastro de venda, é só você fechar e abrir a query da tabela filha com o código acima ...

 

*lembre-se que sempre que você for incluir um item na tabela filha, você deve configurar o campo ITENS_VENDA.CodVenda = VENDA.CodVenda.

 

 

se você utilizar o seguinte código:

 

query.sql.text:= 'select sum(Qtd_Venda * Preco_Venda) as TOTAL from ITENS_VENDA where CodVenda = :P_CODVENDA';
query.parambyname('P_CODVENDA').value:= queryVendaCODVENDA.value;
query.open;

assim você obtém o total dos items ...

 

 

espero ter te dado uma luz ...

 

qq dúvida é só postar ...

 

 

abraço !!

[PedroInfoTec 0]

OK!.. Muito Obrigado.. Funciona.. XD~~