Pesquisar na Comunidade
Showing results for tags 'Balança Sigtron'.
Encontrado 1 registro
-
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.