Ir para conteúdo
  • Cadastre-se

dev botao

Acbrboleto1.lerretorno


Ver Solução Respondido por Hetosoft Sistemas,
  • Este tópico foi criado há 3636 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

Eu usando

 

cobCaixaEconomica

c240

 

ACBrBoleto1.LerRetorno;

 

 

da erro neste lugar, erro de data falalndo que 00/00/00 nao data valida,

significa que tem alguma configuracao que eu nao fis no ACBrBoleto1 ?

 

procedure TACBrCaixaEconomica.LerRetorno240(ARetorno: TStringList);

 

 

e como faço para colocar o que leu em um Memo1,

 

obrigado pela atencao.

 

 

Link para o comentário
Compartilhar em outros sites

  • Membros Pro
  • Solution

procedure TfrmDemo.Button8Click(Sender: TObject);
Var
 i: integer;
 Titulo : TACBrTitulo;
begin


   ACBrBoleto1.LerRetorno;



   try
       For I := 0 to ACBrBoleto1.ListadeBoletos.Count - 1 do
       begin
        Titulo := ACBrBoleto1.ListadeBoletos.Objects;

        Memo1.Lines.Add('Numero do Documento = ' + Titulo.NumeroDocumento);
        Memo1.Lines.Add('Valor Recebido      = ' + FloatToStr(Titulo.ValorRecebido));
        Memo1.Lines.Add('Nosso Numero        = ' + Titulo.NossoNumero);
        Memo1.Lines.Add('Nome do Cliente     = ' + Titulo.ACBrBoleto.Name);
       end;
   finally


   end;



end;

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 3636 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.