Jump to content

click.png click.png click.png

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


Saiba mais

beneficios.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

comunicação Balança


Caique Bendia
Go to solution Solved by Daniel Simoes,
  • Este tópico foi criado há 931 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui

Recommended Posts

Estou fazendo com que meu programa leia e puxe o peso de uma balança da Elgin com interface serial RS232,com o seguinte código:

//configurando balanca
 if DM.fdsCaixaMODELO_BALANCA.AsString > '0' then
    begin
     if frmPrincipal.acbrBal1.Ativo then
        frmPrincipal.ACBrBAL1.Desativar;

        frmPrincipal.ACBrBAL1.Modelo := TACBrBALModelo(StrToInt(DM.fdsCaixaMODELO_BALANCA.AsString));
        frmPrincipal.ACBrBAL1.Porta := DM.fdsCaixaPORTA_BALANCA.AsString;

        frmPrincipal.ACBrBAL1.Ativar;
    end;
    Except on E: Exception do
     begin
      ShowMessage('Erro na leitura da balança: ' + E.Message);
     end;
    end;
//fim da configuracao da balanca

//pegando peso
procedure TfrmPrincipal.LeBalanca;
Var TimeOut : Integer ;
begin
     TimeOut := 2000 ;
     ACBrBAL1.LePeso( TimeOut );
  
     if ACBrBAL1.LePeso > 0 then
     begin
     edtItemQtn.Text := FloatToStr(ACBrBAL1.LePeso);
     end;
  
end;
// fim pega peso

gostaria de saber se é necessário além dessas outras configurações(Quais?) da balança necessárias para que o peso seja lido e puxado para o campo que eu quero. Fiz testes e me parece que leu o peso mas não teve retorno algum,não deu mensagem de erro algum, e como não tenho um  emulador de balança não consigo fazer alguns testes.
Alguém poderia me ajudar, onde estou  errando ou deixando passar alguma coisa.

Dês de já agradeço. 

Link to comment
Share on other sites

  • Fundadores
  • Solution

Por favor analise o funcionamento do ACBrBAL, no projeto Demo:

\ACBr\Exemplos\ACBrSerial\ACBrBAL\Delphi

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

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

Link to comment
Share on other sites

×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.