Ir para conteúdo
  • Cadastre-se

dev botao

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

Recommended Posts

  • Membros Pro
Postado

Prezados, estou tentando colocar o TEF num projeto.

No create carrego os dois combobox igual ao exemplo ACBr, mas quando mando inicializar recebo a mensagem 'argument out of range'.

O que estou fazendo errado ou não fazendo?

Obrigado.

 

Abraço.

 

 

  • Moderadores
Postado
9 horas atrás, Geraldo Rodrigues disse:

Prezados, estou tentando colocar o TEF num projeto.

No create carrego os dois combobox igual ao exemplo ACBr, mas quando mando inicializar recebo a mensagem 'argument out of range'.

O que estou fazendo errado ou não fazendo?

Obrigado.

 

Abraço.

 

 

Programou todos os eventos?

selecionou qual solução tef?

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

  • Membros Pro
Postado

Olá Juliomar.

 

Sim, programei todos os eventos e também escolhi a solução tef.

A mensagem surge na   ' procedure TACBrTEFD.Inicializar(GP : TACBrTEFDTipo);' - em:

 

     GPAtual := GP ;
     try
       fTefClass.Inicializado := True;   -  aqui .....
       fTefClass.Habilitado   := True;
     except
       fTefClass.Inicializado := False;
       raise ;
     end;
 

 

  • Moderadores
Postado

Certo e está usando qual tipo para inicializar?

ACBrTEFD.Inicializar(XXXXX);

gpNenhum, gpTefDial, gpTefDisc, gpHiperTef, gpCliSiTef,
gpTefGpu, gpVeSPague, gpBanese, gpTefAuttar, gpGoodCard,
gpFoxWin, gpCliDTEF, gpPetrocard, gpCrediShop, gpTicketCar,
gpConvCard

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

  • Membros Pro
Postado

Juliomar, eu já tentei várias situações:

- Indicando como no demo:

  cbxGP.Items.Clear ;
  For I := Low(TACBrTEFDTipo) to High(TACBrTEFDTipo) do
     cbxGP.Items.Add( GetEnumName(TypeInfo(TACBrTEFDTipo), integer(I) ) ) ;
  cbxGP.Items[0] := 'Todos' ;
  cbxGP.ItemIndex := 0 ;

  Nesta opção escolho no combobox a opção gpTefDial;

- Indicando: cbxGP.ItemIndex := 1 ;

-  Indicando direto: ACBrTEFD1.Inicializar( gpTefDial );

 

 

×
×
  • 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.