Pesquisar na Comunidade

Olá... Recentemente precisei integrar a balança/módulo WEIGHTECH WT3000-iR. Ao tentar utilizar o modelo existente "balWeightechWT3000_ABS" no componente ACBrBAL, a leitura veio 10x menor. Pesquisando melhor, vi que existem os modelos "WT3000_ABS" e "WT3000IR_ABS". Como eu não tinha um manual de integração e balança WT3000_ABS para testar o "balWeightechWT3000_ABS", achei melhor fazer uma nova classe para o "WT3000IR_ABS", para não mexer na outra classe e causar alguma quebra de compatibilidade. A princípio, o formato parece ser compatível com a balança LIBRATEK WT 3000 I R, e me baseei em parte na implementação dela. Porém lendo o manual de integração, vi que tem mais de um formato de mensagem, no caso, o padrão configurado no cliente atende aos formatos Fm1, Fm2 e Fm9. Foi implementada a leitura para esses formatos, e para transmissão normal e transmissão contínua. Implementei as classes: "TACBrBALWeightechWT3000IR_ABS" na unit "Fontes\ACBrSerial\ACBrBALWeightechWT3000IR_ABS". "TFormatoFm1Fm2Fm9Util" na unit "Fontes\ACBrSerial\ACBrBALWeightechWT3000IR_ABS_Fm1Fm2Fm9". Alterei as units: "Fontes\ACBrSerial\ACBrBAL" "TACBrBALModelo": Adicionada a enumeração "balWeightechWT3000IR_ABS". Uses (implementation): "ACBrBALWeightechWT3000IR_ABS" Método "TACBrBAL.SetModelo": "TACBrBALWeightechWT3000IR_ABS.Create(Self);" Obs.: Como existem mais formatos além dos citados acima, resolvi criar uma classe utilitária à parte, para a interpretação dos formatos que pertencem ao mesmo padrão (conforme o manual), achei melhor criar separado pra não deixar a classe referente à balança muito "cheia". Dessa forma, caso seja necessário implementar para os outros padrões, basta criar novas classes com a interpretação e usar na classe referente à balança. Caso a implementação não tenha ficado correta ou precisa de melhores explicações, ou se não havia necessidade, favor me informarem. Obrigado! Referências: Site do equipamento https://www.weightech.com.br/indicador-de-pesagem-wt3000-ir-abs Manual de integração https://drive.google.com/file/d/1R1tTGp5TZCRFR_6errg13vUV4k759NL1/view?usp=sharing WT3000_ABS e WT3000iR_ABS ACBrBAL.pas ACBrBALWeightechWT3000IR_ABS.pas ACBrBALWeightechWT3000IR_ABS_Fm1Fm2Fm9.pas

Ola, estou testando esta balança de precisão BEL LG3202i mas não consegue indentificar o peso. Na Function TACBrBALPrecision.InterpretarRepostaPeso não consegui indentificar da onde ele esta trazendo a variavel "resposta", mesmo alterando ela, ela traz o valor do peso de outro lugar. Alguem ja configurou este modelo de balança ou outra de precisão? BalLog.txt

Estou usando o AcBrBal para tentar capturar peso de diversas balanças, estou usando um simulador de balança que está funcionando corretamente, baixei o "BalancaTeste" do AcBr e ele também não exibe o peso na caixa de ultimo peso lido, mas exibe no campo "Ultima resposta", acredito que para obter a ultima resposta deve ser o comando: BAL_InterpretarRespostaPeso, estou usando VBA. Será que estou executando erroneamente a função de InterpretarRespostaPeso? OBS: Quando uso a funcao BAL_LePeso, o log é preenchido: -- 18/09 14:47:44:929 - - 14:47:44:929 RX <- 05382 -- 18/09 14:47:44:929 - UltimoPesoLido: 0 - Resposta: 05382 Funções: Public Declare PtrSafe Function BAL_LePeso Lib "caminho da minha lib" (ByVal MillisecTimeOut As Integer, ByRef Peso As Double) As Long (retorna 0) Public Declare PtrSafe Function BAL_InterpretarRespostaPeso Lib "caminho da minha lib" (ByRef aResposta As String, ByRef Peso As Double) As Long (retorna 0) Esta imagem é um print do aplicativo de testes que baixei do acbr, queria capturar o "Ultima Resposta"

Um dos meus clientes tem uma balança "elgin dp30ck". No componente ACBrBal não tem o modelo Elgin ou até mesmo Bematech. Como faço para usar o componente com esta balança?

Boa tarde. Estou realizando a integração do nosso sistema com uma balança da marca Saturno. O padrão de resposta é composto juntamente com os indicadores de peso (Estabilidade do Peso e Estado da Balança) <CR>, PPPPPP, “E”/“O”, “L”/“B”, “_”, “ ”, <LF> (Conforme manual de integração), por exemplo: 023060EL_. Onde: <CR> = Carriage Return (#13), PPPPPP = Peso na Balança, E/O = Estado do Peso, L/B = Estado da Balança, <LF> = Line Feed. Testando o retorno por um outro software (Hercules SETUP utility) o retorno vem da seguinte forma no próprio Hercules utility: 006320OL_. Copiando esse valor e informando no "Exemplo de Emulador de Balanças do ACBr" e enviando, o retorno é interpretado corretamente pela classe TACBrBALSaturno da Unit ACBrBALSaturno no nosso sistema e peso é exibido de forma correta. Porém, ao realizar a leitura diretamente pela porta COM, o peso recebido fica zerado sempre, e observei que conforme o log de pesagem, ao que parece os textos [CR] e [LF] estão sendo recebidos de forma literal diretamente na resposta. Realizei o tratamento no método InterpretarRepostaPeso, também removendo esses textos (CR e LF) e ao que parece, classe passou a interpretar corretamente nesse caso. Obs.: Sei que CR = Carriage Return e LF = Line Feed, ambos sendo representados por #13 e #10 consecutivamente. Segue abaixo onde foi modificado (duas últimas linhas). if wAchouE or wAchouO then begin if wAchouE then wPosEO := Pos('E', UpperCase(aResposta)) else wPosEO := Pos('O', UpperCase(aResposta)); wResposta := Copy(aResposta, 0, wPosEO - 1); { Removendo caracteres especiais, caso encontre algum } wResposta := StringReplace(wResposta, '°', '0', [rfReplaceAll]); wResposta := StringReplace(wResposta, '±', '1', [rfReplaceAll]); wResposta := StringReplace(wResposta, '²', '2', [rfReplaceAll]); wResposta := StringReplace(wResposta, '³', '3', [rfReplaceAll]); wResposta := StringReplace(wResposta, '´', '4', [rfReplaceAll]); wResposta := StringReplace(wResposta, 'µ', '5', [rfReplaceAll]); wResposta := StringReplace(wResposta, '¶', '6', [rfReplaceAll]); wResposta := StringReplace(wResposta, '·', '7', [rfReplaceAll]); wResposta := StringReplace(wResposta, '¸', '8', [rfReplaceAll]); wResposta := StringReplace(wResposta, '¹', '9', [rfReplaceAll]); wResposta := StringReplace(wResposta, '[CR]', '', [rfReplaceAll]); // Modificado: Remover [CR] wResposta := StringReplace(wResposta, '[LF]', '', [rfReplaceAll]); // Modificado: Remover [LF] end Segue um trecho do log de pesagem: -------------------------------------------------------------------------------- ATIVAR - 04/04/22 14:22:34:841 - Modelo: Saturno - Porta: COM4 Device: BAUD=9600 DATA=8 PARITY=N STOP=1 HANDSHAKE= MAXBANDWIDTH=0 SENDBYTESCOUNT=0 SENDBYTESINTERVAL=0 -------------------------------------------------------------------------------- - 14:22:35:862 RX <- [CR]023060EL_ [LF][CR]023060EL_ [LF][CR]023060EL_ [LF][CR]023060EL_ [LF][CR]023060EL_ [LF] UltimoPesoLido: 0 - Resposta: [CR]023060EL_ [LF][CR]023060EL_ [LF][CR]023060EL_ [LF][CR]023060EL_ [LF][CR]023060EL_ [LF] O cliente ainda não informou o modelo em específico, mas assim que informar eu posto aqui. Gostaria de saber se alguém já passou por isso, se pode ser alguma particularidade do módulo que envia os pacotes de dados (alguma configuração como ele envia a resposta de peso), ou se realmente a alteração que eu fiz faz sentido e pode ser incluída no trunk do ACBr? Existe algum motivo do log gravar com esse [CR] e [LF] de forma literal? Seguem em anexo o código fonte modificado e o log de pesagem. Obrigado. ACBrBALSaturno.pas Log-Pesagem.log Teste-Balanca-Saturno-HerculesUtility.txt

Boa tarde, Implementado novo modelo para a balança Coimma EC100 e indicador WIGHTECH WT27 ( anexo Modelo_balanca_coimma_EC100_WT27.jpg ), via protocolo ETH. !! (isso mesmo, ETH conforme anexo Coimma_EC100_WT27_ConversorWT420.pdf ). Para mim é um universo novo (eu já havia implementado a comunicação com balança pelo componente, mas funcionou com layout pré-existente) e pastei tentando implementar o protocolo que me foi informado que seria o correto (EPM anexo Protocolo_EPM.pdf). No final, comunicando via RS232, a leitura é feita nos termos do protocolo ETH. 1. Fontes da nova balança: NovaBalanca_WT27R_ETH.rar * Anexo ( IMG_Pesagem.png ) contendo simulações com o emulador ( também validadas no cenário do cliente ), validando: * Peso positivo * Peso instável * Peso negativo 2. Para fazer os testes durante o desenvolvimento implementei, no Emulador de Balança, uma opção para enviar comandos formatados. * Estou mandando o fonte separado ( Emulado_ComandoFormatado.rar), caso implementem apenas a nova balança sem a alteração no Emulador * Deixando o novo campo em branco, envia os comandos padrões do Emulador. * Pressionando F1 no novo campo, coloquei algumas instruções, inclusive com exemplos para simular os mesmos envios efetuados por padrão pelo Emulador. * Se acharem interessante incorporar ao fonte do emulador, essa opção pode facilitar a implementação de futuros protocolos por outras pessoas. Exemplos de Comandos Formatados: -------------------------------- Peso ok..: EB,kg,B: #ESPACO1 #PESO6 ,T:000000,L: #ESPACO1 #PESO6 C/3dec ok: EB,kg,B: #ESPACO1 #PESO6,3 ,T:000000,L: #ESPACO1 #PESO6,3 Negativo.: EB,kg,B:- #PESO6 ,T:000000,L:- #PESO6 Instavel.: IB,kg,B: #ESPACO1 #PESO6 ,T:000000,L: #ESPACO1 #PESO6 Leitura de Comandos Convertidos para o peso 6,774: --------------------------------------------------- Peso ok..: EB,kg,B: 006774,T:000000,L: 006774 C/3dec ok: EB,kg,B: 06,774,T:000000,L: 06,774 Negativo.: EB,kg,B:-006774,T:000000,L:-006774 Instavel.: IB,kg,B: 006774,T:000000,L: 006774 Coimma_EC100_WT27_ConversorWT420.pdf Protocolo_EPM.pdf

Olá, pessoal! Estou fazendo a homologação de uma balança Filizola ID-M 150/4, mas não estou conseguindo fazer a leitura. O retorno que tenho com o BalançaTeste é esse: Anexei um PDF com o protocolo de comunicação dessa balança. O peso correto é 2,65 kg e isso está vindo na resposta : Percebi que ao marcar "Monitorar a Balança", o retorno é bem inconsistente. Alguém já fez a configuração dessa balança ou já teve o mesmo problema? Agradeço desde já! 386306761-Protocolo-Filizola-IDM-drbalanca-com-Br.pdf

Atualizei os fontes do acbr, e quando vou compilar aparece essas mensagens: [DCC Error] lancamento_item.pas(1050): E2003 Undeclared identifier: 'TACBrHandShake' [DCC Error] lancamento_item.pas(1052): E2003 Undeclared identifier: 'TACBrSerialParity' [DCC Error] lancamento_item.pas(1054): E2003 Undeclared identifier: 'TACBrSerialStop' As uses estao declaradas ACBrDevice, ACBrBAL no meu codigo ele esta sendo carregado com as informaçoes que estao no arquivo .INI dm.balanca.Device.HandShake := TACBrHandShake(StrToIntDef(frmPrincipal.LerIni(sArqConfig, 'BALANCA', 'Balança handshaking', '0'), 0)); dm.balanca.Device.Parity := TACBrSerialParity(StrToIntDef(frmPrincipal.LerIni(sArqConfig, 'BALANCA', 'Balança parity', '0'), 0)); dm.balanca.Device.Stop := TACBrSerialStop(StrToIntDef(frmPrincipal.LerIni(sArqConfig, 'BALANCA', 'Balança stopbits', '0'), 0)); dm.balanca.Device.Data := StrToIntDef(frmPrincipal.LerIni(sArqConfig, 'BALANCA', 'Balança databits', '8'), 8); alguem sabe me dizer o que pode ser ?

Senhores, boa tarde. Estou utilizando o componente ACBrBal para comunicação com uma balança Tolelo 2180. Tudo funcionou, entretanto tive que realizar um ajuste na unit "ACBrBALToledo2180.pas", comentando a linha 133, como segue: 129. if (wPos > 0) then 130. begin 131. wResposta := Copy(aResposta, wPos + 1, Length(aResposta)); 132. wResposta := Copy(wResposta, 1, 6); 133. //Insert('.', wResposta, 6); <======= essa linha ======= 134. end 135. else 136. wResposta := 'I'; Vide manual a seguir, página 167, Protocolo P03: https://cdn.toledobrasil.com.br/app/institucional/files/manuais/MU TI400 - 3474457 - Rev. 05-08-19.pdf Neste protocolo o peso do display é enviado após o caracter #96 em 6 posições sem porção decimal. A linha de código 133 faz com que o peso fique dividido por 10. Estou a disposição para mais informações. Segue unit alterada anexo. ACBrBALToledo2180.pas

ACBrLibBAL Visulizar Arquivo ACBrLibBAL - Biblioteca para leitura de balança Faça Download pelo SVN, dos Demos de uso da ACBrLibBAL em diversas linguagens, usando o endereço: http://svn.code.sf.net/p/acbr/code/trunk2/Projetos/ACBrLib/Demos/ Manual On-Line: https://acbr.sourceforge.io/ACBrLib/ACBrLib.html Autor Daniel Simoes Enviado 08-09-2019 Categoria ACBrLib - PRO  

Boa tarde ! Estou usando a balança toledo e nos testes o edit de ultimopesolido está vindo zerado. Alguém pode me ajudar? att.

Unit para receber pesos da Classificadora Marel. ACBrBALMarelCG62XL.pas

Em um cenário que eu tenho uma balança com a opção de 'monitorar balança' ativado. Quando a balança estabilizar o peso eu quero imprimir uma etiqueta, e somente quando a balança voltar para o peso zero(sem objeto na balança) eu habilito o usuario a colocar um novo objeto na balança para tirar uma nova etiqueta. Vamos pegar o exemplo o arquivo da ACBrBALDigitron.pas que na linha 80 e 115 da function InterpretarRepostaPeso tem um 'Result := 0;' a minha sugestão é que retorne 'Result := -9; { Peso não foi recebido }'. Motivo: Se no momento da leitura do peso, o componete receber uma resposta pela metade ou por algum motivo o componete nao conseguir interpretar a resposta o componente retorna a resposta 'Result := 0;' ACBrBALDigitron.pas

Pessoal boa tarde, Alguém poderia me ajudar, ao tentar ler o Peso da balança Prix 3 só me retorna -9,000 -------------------------------------------------------------------------------- ATIVAR - 08/09/17 11:49:41:662 - Modelo: Toledo - Porta: COM3 Device: BAUD=4800 DATA=8 PARITY=N STOP=1 HANDSHAKE= MAXBANDWIDTH=0 SENDBYTESCOUNT=0 SENDBYTESINTERVAL=0 -------------------------------------------------------------------------------- - 11:49:43:705 TX -> [ENQ] UltimoPesoLido: -9 - Resposta: - Protocolo: N[227]o Definido - 11:52:13:413 TX -> [ENQ] UltimoPesoLido: -9 - Resposta: - Protocolo: N[227]o Definido - 11:52:16:469 TX -> [ENQ] UltimoPesoLido: -9 - Resposta: - Protocolo: N[227]o Definido

Boa tarde! Utilizando o ACBrBal algum colega do fórum conseguiu fazer a comunicação com uma balança Triunfo - modelo DST-30-C/T ? (se positivo, qual balança usou na propriedade Modelo do referido componente?) Muito obrigado pela atenção

Boa ! Deu um search no fórum e não achei solução para este problema. Quando tento utilizar a balança toledo 9094 com ACBr ele me retorna o erro Communication error 1 : Função Incorreta. Já tentei todas as configurações possíveis do emulador. Gostaria de saber se alguém já conseguiu comunicação com esta balança utilizando o ACBr. Anexado segue log... acbrbal.log

Olá Pessoal, Estou com o seguinte problema... Ao usar a função LerPeso se a balança tiver desconectada porém o componente tiver ativo não recebemos nenhum erro para que possamos tratar em nossa aplicação. Gostaria de saber como implementar uma exception ao tentar LerPeso onde tivesse um retorno para saber o que informar ao usuário que opera o sistema. Atualmente ele só retorna erro quando debugamos. Ficaria muito agradecido... Abraço!

Boa tarde amigos !!! Por favor, estava recompilando meus códigos e percebi algo que não havia notado anteriormente. Percebi que existe uma variação na leitura do peso.... As vezes para mais e as vezes para menos de 1grama... Alguém sabe me informar o porque disso e se existe algo que possa fazer para que a leitura seja exatamente igual a enviada ? Muito obrigado !!!

Boa Tarde Pessoal, É o meu primeiro contato aqui com o Fórum. E estou procurando recursos (DLL, Bibliotecas ou Executáveis) que fazem a Leitura do Módulo 9091 da Toledo para Leitura de Pesos de balança deste mesmo fabricante. Tem muito tópico já falando sobre isso, mas como não conheço muito bem ainda como funciona aqui no fórum, acabei não entendo direito o que fazer. Por isso pergunto: 1) As DLL´s, Programas e recursos disponíveis neste Site, são gratuitos ? Se não, onde estão os preços e como proceder para compra-los ? 2) Existe DLL de Leitura da Toledo para quem programa que C#.Net ( webforms ou winforms ) ? 3) Como faço para obter documentação destas DLL´s de como funcionam, exemplos, etc ? 4) Caso seja preciso contratar alguém que já conheça esse tipo de integração, existe um local no Site onde posso ofertar esse oportunidade ? Agradeço antecipadamente, quem puder ajudar. Att, Cristiano Curitiba - PR

Boa tarde, Estou utilizando o exemplo 'BalancaTeste' para ler o peso da balança toledo. Configurei corretamente porem onde exibe 'Ultimo Peso Lido', exibe o valor -9,000 e a mensagem: 'Communication error 9997: Timeout during operation' Por favor, alguem saberia dizer o que pode ser essa mensagem? Obrigado

Bom dia, procurei pelo forum e as soluções dos colegas não deram certo para mim por isso crio este novo topico... Estou utilizando os fontes novos da Acbr com aplicação delphi Xe8 o componente AcbrBall, configurei o mesmo corretamente de acordo com as configurações do aplicativo anterior que temos aqui, no caso desenvolvido em delphi 7, o antigo aplicativo comunica certinho com a balança, ja o novo não, para fazer a nova aplicação com a balança segui o projeto exemplo que vem junto com o componente, o que não consigo entender é o aplicativo estar com as configurações corretas e mesmo assim a balança não responder...Utilizando o emulador da acbr o sistema comunica fiz os testes e funciona, mas com a balança não vai..Uma observação sobre o baud é que passo para o componente 2400 e no log sai 9600.. Se alguem puder indicar um caminho vou agradecer muito... segue anexo do log da balança aonde os que tiveram sucesso foram pelo emulador balancaLog.txt

Necessito uma solução para realizar a comunicação com balanças no meu software que é desenvolvido em .Net. Gostaria de saber se o componente ACBrBal pode ser utilizado neste sentido ? Não achei manuais e mais materiais a respeito do componente e tão pouco o próprio componente para download, então se alguém puder me ajudar com isso, agradeço !

Boa tarde, estou iniciando com uma aplicação para trabalho de conclusão de curso, onde estamos montando um sistema de pesagem de entrada e saída para cerealistas e armazéns gerais. Mas estou com duvida e não encontrei a documentação com exemplo de codificação para a leitura de uma balança rodoviária Toledo 8530, tenho acesso a uma balança para os testes. Alguém teria exemplo de como usar o componente em C#?