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

26/12/2015

3

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]
Responder

Posts

28/12/2015

P2

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.
Responder
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?
Responder

30/12/2015

P2

Exatamente isso, teve progresso ?
Responder
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?
Responder

31/12/2015

P2

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/
Responder
irei olhar amigo. Muito obrigado.
Existe algo como:
array:=query.records?
Responder
Amigo teria como me mostrar um exemplo?
Responder

01/01/2016

P2

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.
Responder
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.
Responder