Olá desenvolvedor do componente ACBrBal.
Recentemente tive que fazer uma alteração no fonte do componente ACBrBalDigitron.pas porque não estava pegando o terceiro dígito das casas decimais. Veja o exemplo abaixo:
procedure TACBrBALDigitron.LeSerial(MillisecTimeOut: Integer);
Var
Resposta : AnsiString ;
Decimais : Integer ;
begin
fpUltimoPesoLido := 0 ;
fpUltimaResposta := '' ;
Decimais := 100 ;
Try
fpUltimaResposta := Copy(fpDevice.Serial.RecvPacket( MillisecTimeOut ),1,10);
Resposta := Trim( copy( fpUltimaResposta, 2, 6 )) ; // estava assim
Resposta := Trim( copy( fpUltimaResposta, 2, 7 )) ; // alterei para 7
Consegui resolver aqui, mas estou divulgando aqui para que todos saibam e corrija no componente para que nas próximas versões esteja correto.
Agradeço a atenção dispensada.
Carlos Clay
Obs.:
Informo também que na página oficial do ACBr tem um link para reportar um bug e está com erro no mantis.