is not a valid floating point value

[LDRabelo]

Boa noite,

 

Estou usando o AcbrBal, quando mando ler o peso, ocorre o seguinte erro:

000260 is not a valid floating point value,

o erro ocorre quando  o sistema le essa procedure

 

procedure TACBrBALClass.LeSerial(MillisecTimeOut: Integer);

//nessa linha

fpUltimoPesoLido := InterpretarRepostaPeso(fpUltimaResposta);

 

alguem poderia me ajudar.

 

Obrigado

 

Luis

[Juliana Tamizou]

Bom dia,

Como está configurado o componente?

Att.

[LDRabelo]

Estou usando o componente do exemplo do ACBRBal, apenas coloquei uma balança fiz as configurações dela conforme o manual, quando clico no botão para ler o peso ocorre esse erro.

Tenho que usar outro componente Acbr??, pois estou usando somente o AcbrBal, quero apenas ler o peso e gravar no BD, nada será impresso.

 

 

Luis

[Juliana Tamizou]

Boa tarde.

Você não disse como estão as propriedades do componente ACBrBal.

Att.

[LDRabelo]

   ACBrBAL1.Modelo           := balSaturno;
   ACBrBAL1.Device.HandShake := Nenhum;
   ACBrBAL1.Device.Parity    := none;
   ACBrBAL1.Device.Stop      := s1;
   ACBrBAL1.Device.Data      := 8;
   ACBrBAL1.Device.Baud      := StrToInt(4800 );
   ACBrBAL1.Device.Porta     := COM1;
   ACBrBAL1.ArqLOG           := edLog.Text;

[LDRabelo]

Percebi que o UltimoPesoLido está vindo com #D000110 e quando vai vazer a conversão está dando esse erro de  is not a valid floating point value, alguem sabe como corrigir?

 

Luis

[LDRabelo]

em anexo o Log do componente.

BalLog.txt

[LDRabelo]

Em 04/04/2019 at 08:41, Juliana Tamizou disse:

Bom dia,

Como está configurado o componente?

Att.

ACBrBAL1.Modelo           := balSaturno;
   ACBrBAL1.Device.HandShake := Nenhum;
   ACBrBAL1.Device.Parity    := none;
   ACBrBAL1.Device.Stop      := s1;
   ACBrBAL1.Device.Data      := 8;
   ACBrBAL1.Device.Baud      := StrToInt(4800 );
   ACBrBAL1.Device.Porta     := COM1;
   ACBrBAL1.ArqLOG           := edLog.Text;

 

abaixo o Log que está sendo gerado

BalLog.txt

[EMBarbosa]

Em 05/04/2019 at 15:40, LDRabelo disse:

ACBrBAL1.Modelo           := balSaturno;
   ACBrBAL1.Device.HandShake := Nenhum;
   ACBrBAL1.Device.Parity    := none;
   ACBrBAL1.Device.Stop      := s1;
   ACBrBAL1.Device.Data      := 8;
   ACBrBAL1.Device.Baud      := StrToInt(4800 );
   ACBrBAL1.Device.Porta     := COM1;
   ACBrBAL1.ArqLOG           := edLog.Text;

 

abaixo o Log que está sendo gerado

BalLog.txt 996 B · 0 downloads

Nesse log não parece haver nada estranho. Você consegue reproduzir o problema no DEMO?

Qual a marca e modelo da balança? Talvez seja o protocolo.