Como mostrar no DBGrid
Olá colegas!
Naum conheço muito de Delphi então lá vai a questão!!!!
Possuo 5 tabelas:
1- socio
2- empresa
3- alt_contr
4- constrit
5- distrt
e três auxiliares
1- aux_alter
2- aux_const
3- aux_distr
como posso colocar em um form utilizando DBGrid o resultado de uma pesquisa que me retorne:
1.ª Coluna 2.ª Coluna 3.ª Coluna
Nome_empresa Data_Alteracao Descrição
Naum conheço muito de Delphi então lá vai a questão!!!!
Possuo 5 tabelas:
1- socio
2- empresa
3- alt_contr
4- constrit
5- distrt
e três auxiliares
1- aux_alter
2- aux_const
3- aux_distr
como posso colocar em um form utilizando DBGrid o resultado de uma pesquisa que me retorne:
1.ª Coluna 2.ª Coluna 3.ª Coluna
Nome_empresa Data_Alteracao Descrição
Zeramos
Curtidas 0
Respostas
Joilson_gouveia
15/09/2003
Vc dece usar um componente Query e um Componente DataSource. O componente Query deve ser linkado com o componente DataSource através da propriedade DataSet deste. O componente DataSource, por sua vez, deve ser linkado ao DBGrid através da propriedade DataSource.
A consulta SQL que retornará os dados ao DBGrid depende dos campos da(s) tabela(s) associada(s). Exemplo:
Query1.SQL.Text := ´SELECT A.EMPRESA,B.SOCIO FROM TB_EMPRESA A INNER JOIN TB_SOCIO B ON A.CODSOCIO=B.CODSOCIO´;
Query1.Open;
//Retorna o nome das Empresas e dos Sócios no DBGrid...
A consulta SQL que retornará os dados ao DBGrid depende dos campos da(s) tabela(s) associada(s). Exemplo:
Query1.SQL.Text := ´SELECT A.EMPRESA,B.SOCIO FROM TB_EMPRESA A INNER JOIN TB_SOCIO B ON A.CODSOCIO=B.CODSOCIO´;
Query1.Open;
//Retorna o nome das Empresas e dos Sócios no DBGrid...
GOSTEI 0
Developer
15/09/2003
Vc dece usar um componente Query e um Componente DataSource. O componente Query deve ser linkado com o componente DataSource através da propriedade DataSet deste. O componente DataSource, por sua vez, deve ser linkado ao DBGrid através da propriedade DataSource.
A consulta SQL que retornará os dados ao DBGrid depende dos campos da(s) tabela(s) associada(s). Exemplo:
Query1.SQL.Text := ´SELECT A.EMPRESA,B.SOCIO FROM TB_EMPRESA A INNER JOIN TB_SOCIO B ON A.CODSOCIO=B.CODSOCIO´;
Query1.Open;
//Retorna o nome das Empresas e dos Sócios no DBGrid...
Ola,
caro amigo onde devo colocar esta linha de codigo para fazer a pesquisa ?
Obs: sou novato em SQL...
agradeço a atenção
GOSTEI 0
Marcelo.c
15/09/2003
caro amigo onde devo colocar esta linha de codigo para fazer a pesquisa ?
Na propriedade SQL do objeto Query.
GOSTEI 0
Cleiton.maciel
15/09/2003
[quote:c7a4f6c72a=´joilson_gouveia´]Vc dece usar um componente Query e um Componente DataSource. O componente Query deve ser linkado com o componente DataSource através da propriedade DataSet deste. O componente DataSource, por sua vez, deve ser linkado ao DBGrid através da propriedade DataSource.
A consulta SQL que retornará os dados ao DBGrid depende dos campos da(s) tabela(s) associada(s). Exemplo:
Query1.SQL.Text := ´SELECT A.EMPRESA,B.SOCIO FROM TB_EMPRESA A INNER JOIN TB_SOCIO B ON A.CODSOCIO=B.CODSOCIO´;
Query1.Open;
//Retorna o nome das Empresas e dos Sócios no DBGrid...
Ola,
caro amigo onde devo colocar esta linha de codigo para fazer a pesquisa ?
Obs: sou novato em SQL...
agradeço a atenção[/quote:c7a4f6c72a]
como vc esta iniciando com o delphi. seria bom que desse um lida em algum conteudo sobre SQL. para que nao fique perdido.
valeu?
GOSTEI 0
Zeramos
15/09/2003
Eu fiz a seguinte query e coloquei na propriedade SQL do Query!
Agora como faço para aparecer o resultado?
Como chamo esta pesquisa no Delphi?
Query1.SQL.Text :=
SELECT Alteracao.razao, Aux_altcontr.data, Aux_altcontr.responsavel,
FROM Alteracao INNER JOIN Aux_altcontr
WHERE Aux_altcontr.FK_codEmpre = empresa.codigo;[/b]
Agora como faço para aparecer o resultado?
Como chamo esta pesquisa no Delphi?
Query1.SQL.Text :=
SELECT Alteracao.razao, Aux_altcontr.data, Aux_altcontr.responsavel,
FROM Alteracao INNER JOIN Aux_altcontr
WHERE Aux_altcontr.FK_codEmpre = empresa.codigo;[/b]
GOSTEI 0
Joilson_gouveia
15/09/2003
Se vc já conectou os componentes (Query1 ao DataSource1 e DataSource1 ao DBGrid1), basta abrir a Query1:
Query1.Open;
Query1.Open;
GOSTEI 0
Zeramos
15/09/2003
JAH CONECTEI!
Porém exibe uma mensagm de erro!
Porém exibe uma mensagm de erro!
GOSTEI 0
Zeramos
15/09/2003
JAH CONECTEI!
Porém exibe uma mensagm de erro!
Galera! Problema resolvido!!!!
:D :D
Obrigado a todos!!!!!
GOSTEI 0