Ir para conteúdo
  • Cadastre-se

dev botao

Incompatibles Types 'tacbrecfmodelo' And Integer


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

Recommended Posts

Bom dia ! 



Estou implantando acbrecf em meu sistema consigo trazer as informações do meu arquivo ini para minha aplicação e também gravar nele as configurações. 


No entanto agora necessito informar ao componente as informações vindas do arquivo ini mas quando compilo da o seguinte erro : 

 

Código:
incompatibles types   'TACBrECFModelo' and Integer 



Algum amigo poderia me dar uma dica? Eu estou fazendo ou melhor tentando fazer as inserções das configurações no componente assim: 
 

Código:
Var 
I : Integer; 
begin 
acbrecf1.Desativar; 
I:=strtoint(cbxmodelo.Text); 
acbrecf1.Modelo      := strtoint(cbxmodelo.Text); 
acbrecf1.Porta       := cbxporta.Text; 
acbrecf1.Device.Baud := baurate.ItemIndex; 
acbrecf1.Ativar; 

 

Link para o comentário
Compartilhar em outros sites

Chegou a dar uma olhada no exemplo ECFTeste que acompanha o ACBr?

 

Nele você pode ver certinho como fazer isso e praticamente tudo relacionado ao componente ACBrECF.

 

No seu caso ai o correto seria:

 

ACBrECF1.Modelo := TACBrECFModelo( cbxModelo.ItemIndex ) ;

  • Curtir 1

Giuliano Naspolini Ribeiro

Automalog Consultoria e Sistemas Ltda

Link para o comentário
Compartilhar em outros sites

Boa tarde, Giulianon !

 

 

Sim, olhei o exemplo minha aplicação já conseguia emitir ECF mas no entanto, vive perdendo a configuração dai resolvi refazer a parte de comunicação.

 

 

Então, obrigado pela resposta, fiz como vc me indicou e de fato já mudou alguma coisa, só que notei que agora a aplicação trava ai só no CTRL alt + del. mAS NO acbrlog.txt agora mudou segue abaixo como está:

 

 

ATIVAR - 25/08/14 01:54:23:421 - Modelo: EscECF - Porta: COM5 - TimeOut: 3
         Device: BAUD=9600 DATA=8 PARITY=N STOP=1 HANDSHAKE=DTR/DSR MAXBANDWIDTH=0
--------------------------------------------------------------------------------
 
-- Ativando a porta: COM5
----------------- ERRO -----------------
Communication error 5: Access is denied
----------------------------------------
 
-- Ativando a porta: COM5
----------------- ERRO -----------------
Communication error 5: Access is denied
----------------------------------------
 
-- Ativando a porta: COM4
----------------- ERRO -----------------
Communication error 5: Access is denied
----------------------------------------
 
-- Ativando a porta: COM4
----------------- ERRO -----------------
Communication error 5: Access is denied
----------------------------------------
 
-- Ativando a porta: COM5
----------------- ERRO -----------------
Communication error 5: Access is denied
----------------------------------------
 
-- Ativando a porta: COM5
----------------- ERRO -----------------
Communication error 5: Access is denied
----------------------------------------
 
 
PS: mudei de porta e mesmo assim da essa mensagem de communication error e a aplicação trava 
DAI TENTEI ABRIR UM CUPOM MESMO SEM COMUNICAÇÃO E DA ESSA MENSAGEM NO LOG:
 
 
-- Ativando a porta: Procurar
-- 13:02:16:578 CorrigeEstadoErro
   13:02:16:578 RX <- 
----------------- ERRO -----------------
Communication error 6: The handle is invalid
----------------------------------------
 
-- 13:02:16:578 
   13:02:16:578 RX <- 
----------------- ERRO -----------------
Communication error 6: The handle is invalid
----------------------------------------
 
AcharPorta( 3 )
-- 13:02:41:093 IdentificaOperador()
   13:02:41:093 RX <- 
----------------- ERRO -----------------
Communication error 6: The handle is invalid
----------------------------------------
 
-- 13:02:43:578 AbreCupom( ., Pedido,  )
   13:02:43:578 RX <- 
----------------- ERRO -----------------
Communication error 6: The handle is invalid
Editado por Fabjo L da Silva
Link para o comentário
Compartilhar em outros sites

Essa mensagem no log Communication error 5: Access is denied significa que a porta já está em uso.

 

Tente verificar se não tem algum outro programa ou mesmo outra instância do seu sistema usando a porta.

 

Pra ter certeza eu sugiro reiniciar o computador e tentar primeiramente usar o ECFTeste para comunicar com a ecf e emitir um cupom de teste.

 

Att.

Giuliano Naspolini Ribeiro

Automalog Consultoria e Sistemas Ltda

Link para o comentário
Compartilhar em outros sites

  • Moderadores

Bom dia

você não falou a marca e modelo da ECF?

está já com uma do protocolo 09/09 testando?

 

se for verifique que existe uma propriedade true e false de controle de porta!

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

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

 

Link para o comentário
Compartilhar em outros sites

Oi bom dia 

 

Na verdade por enquanto estou usando o a impressora virtual da bematech se coloco as configurações diretamente no componente funciona ok mesmo na minha aplicação mas preciso fazer com que tenha uma tela de config para não ter de compilar toda vez que vier uma impressora nova :)

 

voltando...

 

Então agora está dando o seguinte erro  incompatible types TACBRMODELO and TCaption 

 

PS O que esse protoicolo 09/09 ? :)

 

 

Var
I : Integer;
begin
acbrecf1.Desativar;
I:=strtoint(cbxmodelo.Text);
acbrecf1.Modelo:= cbxmodelo.Text;
acbrecf1.Porta:= cbxporta.Text;
acbrecf1.Device.Baud:= StrToInt(baurate.Text);
acbrecf1.Ativar;
Link para o comentário
Compartilhar em outros sites

  • Consultores

 

Oi bom dia 

 

Na verdade por enquanto estou usando o a impressora virtual da bematech se coloco as configurações diretamente no componente funciona ok mesmo na minha aplicação mas preciso fazer com que tenha uma tela de config para não ter de compilar toda vez que vier uma impressora nova :)

 

Veja no exemplo como é feito.

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 3549 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.