rerisson

Olá bom dia! Juliomar, fiz a alteração do tipo da variável conforme você disse e segui uma dica que o Daniel, passou nesse tópico abaixo: E agora minha função ficou da seguinte forma: procedure TFrmFechaVenda.AtualizarDadosTEF; var Resp: TACBrTEFResp; I: Integer; begin for I := 0 to ACBrTEFD1.RespostasPendentes.Count - 1 do begin Resp := ACBrTEFD1.RespostasPendentes[I]; GetBandeiraCartao( Resp ); if FrmVendasCaixa.PagamentosEfetuados.Locate('INDICE', TACBrTEFDResp(Resp).IndiceFPG_ECF, [loCaseInsensitive] ) then begin FrmVendasCaixa.PagamentosEfetuados.Edit; FrmVendasCaixa.PagamentosEfetuadosTEF_AUT.AsString := Resp.NFCeSAT.Autorizacao; FrmVendasCaixa.PagamentosEfetuadosTEF_BANDEIRA.AsString := Resp.NFCeSAT.Bandeira; FrmVendasCaixa.PagamentosEfetuados.Post; end; end; end; Tive que fazer conforme o Daniel disse nessa parte:

Olá boa noite! Consegui resolver fazendo da seguinte forma: Resp := TACBrTEFDResp(ACBrTEFD1.RespostasPendentes[I]); Muito obrigado!!!

Olá boa noite! Acabei de realizar a instalação do ACBr, mas está dando esse erro ao compilar o sistema, tenho um outro computador com uma versão anterior e esta compilando normalmente. [dcc32 Error] UFechaVenda.pas(1011): E2010 Incompatible types: 'TACBrTEFDResp' and 'TACBrTEFResp'

Olá boa noite! Realizei uma nova instalação do ACBr, mas quando vou compilar o sistema está dando o erro abaixo, tenho esse mesmo sistema em outro computador com uma versão anterior do ACBr e está compilando normal. Arquivo do erro: D:\Componentes\ACBr\Fontes\ACBrTXT\SintegraSultan\Sintegra.pas Linha 1318 E2003 Undeclared identifier: 'DecimalSeparator' Atensiosamente.