Pesquisar na Comunidade
Showing results for tags 'ACBrBALUrano'.
Encontrado 3 registros
-
...
-
Pessoal, em anexo segue correção para a classe ACBrBALUrano.pas ao qual o método LePeso estava com problemas, ele lia o peso apenas uma vez e com isso a balança retornava menos caracteres do que o esperado, foi implementada a mesma solução existe nas outras classes de balança - LER varias vezes até receber certo. A alteração foi feita pelo meu irmão Andrews RIcardo Bejatto e está em anexo. Testamos inúmeras vezes usando o equipamento e está funcionando 100% dessa forma. ACBrBALUrano.rar
-
Access Violation Ao Ler Peso Da Balança Urano Pop Z Us 20/2 Pop Light
um tópico no fórum postou Dedox ACBrSerial
Estou testando uma balança Urano Pop Z US 20/2 POP LIGHT e metade das vezes que tento ler o peso da balança ocorre um Access violation no Delphi. A excessão é tratada internamente e não exibe o erro ao usuário, mas nessa situação o resultado obtido do peso da balança é zero. O problema é que se eu manter a comunicação ativa o peso fica alternando entre o peso real e zero num intervalo de meio segundo. No arquivo ACBrBALUrano.pas, no método LePeso, tem um Sleep de 200 milissegundos. Como o erro acontecia na linha seguinte (LeSerial) para resolver o problema aumentei o Sleep para 300 milissegundos. function TACBrBALUrano.LePeso(MillisecTimeOut : Integer) : Double; begin fpDevice.Serial.Purge; fpDevice.EnviaString(#05); { Envia comando solicitando o Peso } //sleep(200); sleep(300); LeSerial( MillisecTimeOut ); Result := fpUltimoPesoLido; end;