Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
JonasB Aprendiz
Registrado: Segunda-Feira, 15 de Abril de 2013 Mensagens: 175
|
Enviada: Dom Mai 26, 2013 10:54 pm Assunto: SELECT DBGRID |
|
|
Galera, estou com uma dúvida..
Preciso fazer um select para exibir dados filtrados no DBGRID, porém estou confuso sobre como fazer isso.
Tenho uma tela de consulta de financeiro, que quando o usuário consulta o título, aparecem as parcelas no DBGRID de acordo com o cliente, numero do titulo e etc.
Tentei da seguinte forma, porém obtive erro..
Código: | dmDados.QryParcelas.Close;
dmDados.QryParcelas.SQL.Clear;
dmDados.QryParcelas.SQL.Add('SELECT * FROM tblParcelas WHERE idFinanceiro =:ParIDFinanceiro');
dmDados.QryParcelas.Parameters.ParamByName('ParIDFinanceiro').Value := edtSeqFinanceiro.text;
dmDados.QryParcelas.Open;
dmDados.QryParcelas.Edit;
dmDados.QryParcelas.FieldByName('codCliente').AsString := dmDados.tblParcelas.FieldByName('codCliente').value;
dmDados.QryParcelas.FieldByName('nomeCliente').AsString := dmDados.tblParcelas.FieldByName('nomeCliente').value;
dmDados.QryParcelas.FieldByName('seqParcela').AsString := dmDados.tblParcelas.FieldByName('seqParcela').value;
//dmDados.QryParcelas.FieldByName('nomeJardim').AsString := dmDados.tblParcelas.FieldByName('nomeJardim').value;
//dmDados.QryParcelas.FieldByName('codTerreno').AsString := dmDados.tblParcelas.FieldByName('codTerreno').value;
//dmDados.QryParcelas.FieldByName('nomeTerreno').AsString := dmDados.tblParcelas.FieldByName('nomeTerreno').value;
dmDados.QryParcelas.FieldByName('emissaoParcela').AsString := dmDados.tblParcelas.FieldByName('emissaoParcela').value;
dmDados.QryParcelas.FieldByName('vencimentoParcela').AsString := dmDados.tblParcelas.FieldByName('vencimentoParcela').value;
//dmDados.QryParcelas.FieldByName('valorTotal').AsString := dmDados.tblParcelas.FieldByName('valorTotal').value;
//dmDados.QryParcelas.FieldByName('observacaoFinanceiro').AsString := dmDados.tblParcelas.FieldByName('observacaoFinanceiro').value;
//dmDados.QryParcelas.FieldByName('qtdeParcelas').AsString := dmDados.tblParcelas.FieldByName('qtdeParcelas').value; |
|
|
Voltar ao Topo |
|
|
coiotetg Aprendiz
Registrado: Segunda-Feira, 29 de Novembro de 2010 Mensagens: 124
|
Enviada: Seg Mai 27, 2013 8:38 am Assunto: |
|
|
Qual erro está dando e qual banco vc está usando? |
|
Voltar ao Topo |
|
|
JonasB Aprendiz
Registrado: Segunda-Feira, 15 de Abril de 2013 Mensagens: 175
|
Enviada: Seg Mai 27, 2013 11:38 am Assunto: |
|
|
Diz que os fields não foram encontrados.. Access |
|
Voltar ao Topo |
|
|
coiotetg Aprendiz
Registrado: Segunda-Feira, 29 de Novembro de 2010 Mensagens: 124
|
Enviada: Seg Mai 27, 2013 1:45 pm Assunto: |
|
|
Na tabela Parcelas vc tem todos os campos que está setando em baixo(nomeCliente)?
E não entendi pq vc está atribuindo novamente os valores para a tabela. |
|
Voltar ao Topo |
|
|
|