Isso mesmo, há 2 maneiras de obter o conteúdo de um campo de uma query:
qBuscaCodigo.asstring >> neste caso só funciona caso você tenha adicionado os campos resultandos da consulta no Fields Editor (botão direito sobre a query) ou qBusca.FieldByName( 'Codigo' ).AsString []s Alexandre ----- Original Message ----- From: Eduardo Oliveira silva To: delphi-br@yahoogrupos.com.br Sent: Wednesday, April 16, 2008 2:01 PM Subject: Re: [delphi-br] Cadastro operação Beleza Alexande , valeu mesmo. Tenho só uma pequena dúvida no código Edit1.Text := qBuscaCodigo.AsString o Codigo é o nome no banco de dados? ou não necessariamente. Em 15/04/08, Alexandre Nicolas <[EMAIL PROTECTED]> escreveu: > > vamos lá, supondo que o nome do query seja "qBusca" e que você já tenha > adicionado > no Fields Editor os campos resultantes da pesquisa: > > . > . > . > qBusca.Open; > > Edit1.Text := qBuscaCodigo.AsString; //caso seja numérico será convertido > para string > Edit2.Text := qBuscaNome.AsString; > Edit3.Text := qBuscaEndereco.AsString; > Edit4.Text := qBuscaCredito.DisplayText; // caso vc tenha colocado a > máscara ",0.00" na prop. "DisplayFormat" deste campo no "Fields Editor" > Edit5.Text := qBuscaEmprestimos.DisplayText; // caso vc tenha colocado a > máscara ",0.00" na prop. "DisplayFormat" deste campo no "Fields Editor" > > []s > > Alexandre Nicolas > > ----- Original Message ----- > From: Eduardo Oliveira silva > To: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br> > Sent: Tuesday, April 15, 2008 4:27 PM > Subject: Re: [delphi-br] Cadastro operação > > beleza, é isso mesmo, mais como eu faço para mostra isso em um formulário > em um edit por exemplo. > > é outra dúvida que tenho, nos formulários de cadastro vai ter um botão de > pesquisa > viz os formularios mais não sei alimentar os edits com os campos da query. > pode me ajudar. > > Em 15/04/08, Alexandre Nicolas <[EMAIL PROTECTED]<nicolas%40qualitysystem.com.br>> > escreveu: > > > > Bom, vejamos se entendi: > > > > você terá uma tabela COOPERATIVA e uma tabela EMPRESTIMOS, a ligação > entre > > as tabelas é o código da cooperativa. > > > > você poderá ter um query, trazendo os dados da cooperativa e a soma de > > todos os empréstimos feitos para ela. > > > > entao o SQL de sua query ficaria assim: > > > > Select c.Codigo, c.Nome, c.Endereco, c.Credito , sum(e.ValorEmprestimo) > as > > SomaEmprestimos > > From COOPERATIVA c > > Left Join EMPRESTIMOS e on c.Codigo = e.CodigoCooperativa > > Where c.Codigo = :CodigoCooperativa > > Group by c.Codigo, c.Nome, c.Endereco, c.Credito > > > > a partir desse exemplo você pode aprimorar esse SQL conforme sua > > necessidade. > > > > []s > > > > Alexandre Nicolas > > > > ----- Original Message ----- > > From: Eduardo Oliveira silva > > To: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br><delphi-br% > 40yahoogrupos.com.br> > > Sent: Tuesday, April 15, 2008 10:34 AM > > Subject: [delphi-br] Cadastro operação > > > > Alguém pode me socorre. > > > > Pessoal estou com um problema, tenho que mostrar um protótipo de > > trabalho da faculdade na quinta feira e estou com algumas dificuldade > > em alguns pontos. > > > > 1- tenho que cadastrar uma operação de credito onde em um formulário > > vou trazer campos de um cooperativa(nome,endereço,crédito), porém os > > campo não estão em uma só tabela, Ex. tenho que fazer o calculo se a > > cooperativa já pegou algum empréstimo e mostra o valor total na tela. > > para fazer isso tudo tenho que passar para pesquisa só o número da > > cooperativa e é o único dado que vai persistir em outra tabela, alguém > > pode me ajudar > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > [As partes desta mensagem que não continham texto foram removidas] > > > [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
