Ir para conteúdo
Fórum Script Brasil

Pablo xD

Membros
  • Total de itens

    3
  • Registro em

  • Última visita

Tudo que Pablo xD postou

  1. O engraçado é que todos os valores tão certos, e atribuídos. :angry: abraço
  2. Olá Jhonas. Então, verificando melhor o debug, percebi que não passa do frmExportacao.Database := Conexao; pois, quando pressiono F7, ele entra na procedure, e no qryContab2, logo, ele para no MesReferencia, mas o erro ocorre na conexao mesmo, me expressei mal. Sorry ^_^ há, e na verdade, o que você sugeriu seria o ParamByName, mas o que se faz aqui, seria o params como objeto, e nesse caso não há o uso do 'if', pois não é uma propriedade de uma query. Grato pela atenção Jhonas. frmExportacao.Database := Conexao; frmExportacao.MesReferencia := Params.MesReferencia; frmExportacao.AnoReferencia := Params.AnoReferencia; frmExportacao.ShowModal; OBS: quando voce passa um parametro, ele possui um indice 0, 1, 2 ... etc exemplo: Params[0].Name := 'modelo'; Params[1].Name := 'sigla'; outra maneira de fazer a passagem de parametros ParamByName('modelo').Text := fmodelo; ParamByName('sigla').Text := fsigla; Então possivelmente o erro esteja onde faltou colocar um indice em Params List index out of bounds frmExportacao.MesReferencia := Params[0].MesReferencia; abraço
  3. Boa tarde. Então, a mais de uma semana, tou com esse problema. Sou usuário do D5 + IBExpert + Firebird. Sou estagiário. Não sei muita coisa de delphi ainda ^^ :rolleyes: Bom, consertando um bug daqui da empresa que estagío, me deparei com esse erro: - List index out of bounds(3). Sei que tem haver com a lista, porém, não existe arrays nem vetores no meu bug. O código: _dbConexao := ADatabase; qryContab1.IB_Connection := _dbConexao; qryContab1.Prepare; qryContab2.IB_Connection := _dbConexao; qryContab2.Prepare; qryContab3.IB_Connection := _dbConexao; qryContab3.Prepare; qryContab5.IB_Connection := _dbConexao; qryContab5.Prepare; qryContab99.IB_Connection := _dbConexao; qryContab99.Prepare; O erro ocorre na qryContab2, e debuggando, mostra também erro logo no MêsReferencia a baixo. frmExportacao.Database := Conexao; frmExportacao.MesReferencia := Params.MesReferencia; frmExportacao.AnoReferencia := Params.AnoReferencia; frmExportacao.ShowModal; Alguém saberia informar como faço para tratar isso? Estou a uma semana com esse projeto, que já era para ser entregue. :wacko: Grato. =D
×
×
  • Criar Novo...