Delphi - Como utilizar 2 datagrids com 1 Query em um mesmo form ? Ex. Cadastro de produtos e tipos de produtos.

MySQL

Delphi

26/12/2015

Pessoal tenho uma tela com 2 datagrids e possuo quero conectar ambos com uma datasorce conectada a uma Query.
Seria basicamente um form onde tenho 1 datagrid mostrando produtos e 1 datagrid mostrando os tipos de produtos, eu consigo conectar ao zquery, mas ambos os datagrids mostram as mesmas informações, vocês poderiam me sugerir algo ou outro componente que funcione da melhor maneira possível?
[img:descricao=tela de cadastro de produtos e seus tipos]http://arquivo.devmedia.com.br/forum/imagem/466853-20151226-231436.jpg[/img]
Raphael Schettino

Raphael Schettino

Curtidas 0

Respostas

Raimundo Pereira

Raimundo Pereira

26/12/2015

Eu não colocaria o cadastro tipo de produto no mesmo form.
Criaria um segundo form, de cadastro tipo de produto.

No form cadastro de produtos colocaria um campo cod_tipo (Colocando a opção F2, para abrir um outro form de consulta de tipo de produto e ao dar enter no tipo do produto, séria preenchido no edit o código);

[img]http://arquivo.devmedia.com.br/forum/imagem/437747-20151228-094901.png[/img]

Mais para resolver sua dificuldade apenas organize.
O problema é que você está usando apenas um data source e uma query para dois grids que pretende obter informações diferentes.


Ex1: Listagem de Produtos

Zquery1
DataSouce1
Zquery1.SQL.TEXT:='SELECT * FROM SUA_TABELA DE PRODUTOS WHERE SALDO>0';
Dbgrid1


Ex2: Tipos de Produto

Zquery2
DataSouce2
Zquery2.SQL.TEXT:='SELECT * FROM SUA_TABELA_TIPO_DE_PRODUTOS';
Dbgrid2


Espero que ajude.
GOSTEI 0
Raphael Schettino

Raphael Schettino

26/12/2015

Sim estou fazendo com orientação a objetos.
A sim, entendi, minha imagem é de cadastro de produtos e no dbgrid de baixo temos os tipos de produtos cadastrados e na imagem ao lado de onde está escrito "tipo" eu posso clicar nela e abrir um form para cadastro de tipos de produtos.
Então já pensando futuramente eu terei que ter 3 Zquery e 3 datasource ? por exemplo: tenho clientes,produtos e tipos de produtos, seria basicamente isso?
GOSTEI 0
Raimundo Pereira

Raimundo Pereira

26/12/2015

Exatamente isso, teve progresso ?
GOSTEI 0
Raphael Schettino

Raphael Schettino

26/12/2015

Sim com 3 datasource e 3 queries deu certo.
Preciso de outra ajuda, como posso armazenar o conteúdo de uma pesquisa em um array?
Por exemplo, tenho lá
Zquery2.SQL.TEXT:='SELECT * FROM SUA_TABELA_TIPO_DE_PRODUTOS'

como eu posso passar tudo oque eu encontrar nesta pesquisa para um array?
GOSTEI 0
Raimundo Pereira

Raimundo Pereira

26/12/2015

Dê uma olhada
http://www.macoratti.net/arrays.htm
http://www.activedelphi.com.br/forum/viewtopic.php?t=53871&sid=7830b24d2524f368a7a655ec5bb6da9d
http://forum.imasters.com.br/topic/206202-arrays-no-delphi/
GOSTEI 0
Raphael Schettino

Raphael Schettino

26/12/2015

irei olhar amigo. Muito obrigado.
Existe algo como:
array:=query.records?
GOSTEI 0
Raphael Schettino

Raphael Schettino

26/12/2015

Amigo teria como me mostrar um exemplo?
GOSTEI 0
Raimundo Pereira

Raimundo Pereira

26/12/2015

Raphael, o que você pretende fazer realmente ?

Pelo que entendi, você vai realizar um select em uma tabela, e gostaria de salvador os dados do retorno em arrays.
E isso ?

Se sim, seria mais fácil criar dataset em run time e guardar os dados na memória.
Se realmente precisa guardar em array, terei que fazer uns testes.
GOSTEI 0
Raphael Schettino

Raphael Schettino

26/12/2015

seria basicamente isso para no futuro eu poder fazer vendas como um sistema comercial.
selecionando itens e adicionando a um array e no final gravá-lo no banco de dados como uma venda.
GOSTEI 0
POSTAR