ACBrPagFor - Nenhum banco Selecionado

[Raul Ulrich Matarazo]

Olá, boa tarde.

Dentro da função

TACBrPagFor.GravarTxtRemessa

Especificamente nessa parte do código:

if not Assigned(FProvider) then
    raise EACBrPagForException.Create(ERR_SEM_BANCO);

Ele mostra exceção de "Nenhum banco Selecionado".

Configurei o componente ACBrPagFor manualmente para fazer um teste:

object ACBrPagFor1: TACBrPagFor
    Configuracoes.Geral.Banco = pagXPInvestimentos
    Configuracoes.Geral.Empresa.TipoInscricao = tiCNPJ
    Configuracoes.Geral.Empresa.NumeroInscricao = '000000000'
    Configuracoes.Geral.Empresa.Convenio = 'Teste'
    Configuracoes.Geral.Empresa.Nome = 'Teste'
    Configuracoes.Geral.Empresa.Conta.AgenciaCodigo = 111
    Configuracoes.Geral.Empresa.Conta.AgenciaDV = 'Teste'
    Configuracoes.Geral.Empresa.Conta.ContaNumero = 2
    Configuracoes.Geral.Empresa.Conta.ContaDV = 'Teste'
    Configuracoes.Geral.Empresa.Conta.DV = 'Teste'
    Configuracoes.Geral.Empresa.Conta.TipoConta = 1
    Configuracoes.Geral.Empresa.Endereco.CEP = 0
    Configuracoes.Geral.UsarDadosConfig = True
    Configuracoes.Arquivos.PathSalvar = 'C:\'
    Configuracoes.Arquivos.Salvar = True
    Configuracoes.Arquivos.SepararPorCNPJ = True
    Configuracoes.Arquivos.SepararPorMes = True
    Left = 392
    Top = 552
  end

Alguém sabe me dizer qual é o erro?

[Juliomar Marchetti]

tente setar isso em tempo de execução e senão me engano tem que ter unit do banco em quiestão junto