TEF - argument out of range

[Geraldo Rodrigues]

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.

 

 

[Juliomar Marchetti]

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?

[Geraldo Rodrigues]

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;
 

 

[Juliomar Marchetti]

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

[Geraldo Rodrigues]

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 );

 

 

[Juliomar Marchetti]

Sim mas tu tem que passar o que está usando de TEF e não qualquer um!

qual a solução TEF que está usando?

[Geraldo Rodrigues]

Estou usando Pay&Go.

[Juliomar Marchetti]

gpTefDisc

[Geraldo Rodrigues]

Olá Juliomar, o problema continua.

 

Acho que encontrei uma solução, assim que terminar todo ciclo de teste, volto aqui para colocar a solução.

 

Obrigado.

 

Abraço.