Ajuda: DbLookupcombobox + SQL + Dbgrid

Delphi

03/01/2014

duas tabelas: uma com o nome estado civil, e outra com o nome membros,
a tabela estado civil fica com o nome dos estados civis e o codigo,
e na de membros só o codigo
quero poder listar o nome da tabela estado civil na dblookupcombobox clicar no botao pesquisar, e mostrar no dbgrid o resultado da tabela membros,
Moabe Oliveira

Moabe Oliveira

Curtidas 0

Respostas

Douglas

Douglas

03/01/2014

Moabe,

Crie no seu formulário um objeto do tipo "TQuery" e conecte ao seu BD. Crie um objeto "DataSource" e seta ele para o objeto
query que você acabou de criar. Agora selecione o objeto query e em suas propriedades tem a opção SQL. Faça o seguinte
código abaixo:

SELECT * FROM ESTADO_CIVIL EC <-COLOQUE NOME DE SUA TABELA ESTADO CIVIL.
INNER JOIN MEMBROS M <-COLOQUE NOME DE SUA TABELA MEMBROS. ON (EC.CODIGO = M.CODIGO)


Feito isto, você irá conectar a propriedade "DataSource" do seu "DbGrid" ao objeto "DataSource" que foi criado anteriormente.
Agora de um duplo click no seu "DbGrid", pois você vai adicionar os campos. Após clicar abrirá uma janela com quatro botões
na parte superior clique no terceiro botão que adicionará todos os campos ao grid. Se você não quiser todos os campos pode
remover clicando no campo e pressionando o botão delete do seu teclado ou retirar por uma das opções da parte superior
desta janela.

Vamos para parte final. Vá na guia de eventos do seu formulário, no evento OnCreate de um open na Query que você criou e
No OnClose do feche a Query.

Conclusão: Quando você pesquisar o estado e selecionar o mesmo, o resultado já irá aparecer na Grid.

Espero ter ajudado e aguardo o seu feedback.
GOSTEI 0
Moabe Oliveira

Moabe Oliveira

03/01/2014

consegui resolver, muito obrigado !
GOSTEI 0
Douglas

Douglas

03/01/2014

Moabe,
Obrigado pelo seu feedback, fiquei muito feliz. Precisando estarei sempre por aqui.
GOSTEI 0
Deivison Melo

Deivison Melo

03/01/2014

Finalizando tópico
GOSTEI 0
POSTAR