Jump to content

dev botao

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

Recommended Posts

  • Membros Pro
Posted

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
Posted
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
Posted

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
Posted

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
Posted

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

 

 

×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.

The popup will be closed in 10 seconds...