ACBrBal no Android

[Ederson Selvati]

Olá pessoal

Estou precisando fazer a leitura de pesos de balancas Elgin e Toledo no Android usando o ACBrBal, sabem me dizer se esta funcionando? Pois aqui nao consigo ler de forma nenhuma, em especial usando o GS300 da Gertec.

 

[Alexandre de Paula]

Boa noite.

Funciona sim. Veja o video abaixo sobre o assunto:

 

[Ederson Selvati]

Oi Alexandre

Obrigado pela pronta resposta

Vou tentar amanhã usando o demo pra ver, mas meu modelo lá será via serial mesmo, quanto a isso também já está compatível?

 

[Ederson Selvati]

Alexandre

Engraçado, testei aqui no GS300 da Gertec e esta me trazendo as portas como COM, olhando o codigo aqui, metodo acharportasseriais, parece so estar gerando COM

Alguma coisa que preciso fazer aqui pra que ele ache as portas seriais corretamente?

 

[Ederson Selvati]

Bom dia

Vi aqui, ele procura as dev/tty aqui no fonte do ACBrBal, mas estranho nao ter achado nenhuma no Gertec GS300

[Daniel Simoes]

Você precisa ver com o Fabricante se esse modelo de equipamento disponibiliza porta Serial, e se o sistema operacional deixa ela acessível a todos usuários

Talvez seja mais simples usar Bluetooth

 

[Ederson Selvati]

Bom dia Daniel

Disponibiliza a serial sim, mas pelo que estou percebendo, nao esta disponivel para todos os usuarios, pelo seu entendimento com o D2 mini, sabe se seria alguma permissão necessária no APP pra poder garantir acesso as portas seriais?

[Daniel Simoes]

No caso do D2Mini as permissões já estavam liberadas a todos, pelo próprio sistema operacional...

No Linux poderíamos inserir o usuário no Grupo que tem acesso a porta Serial... mas no Android não sei se isso funcionaria...

Talvez seja melhor buscar apoio com o fabricante

[Ederson Selvati]

Daniel

Nunca vi dessa forma, mas consegui fazer funcionar, olhe só

 

Porta COM1 no Gertec GS300, lendo uma Elgin DP30

Bem diferente né? Ou então criaram links simbolicos apontando pra COM1

Edited October 3, 2023 by Ederson Selvati

[Daniel Simoes]

Show...

na verdade, COM1 será traduzido para /dev/ttyS0

Nos fontes da classe Synaser, tem uma rotina que traduz os nomes "Windows" para Linux

[Ederson Selvati]

Bom dia pessoal

Este demo/ACBrBal é compativel com o Delphi 10.4.2?

Aqui recebo um range check error ao pedir pra ativar o ACBrBal num demo a parte que fiz, ja o ACBrBalAndroid nem roda compilado nessa versao.

Algum detalhe faltante? Será alguma permissao especifica?

[Ederson Selvati]

Consegui compilar aqui, refiz o AndroidManifest mas na hora de carregar as portas seriais no combo recebo esta msg.

O erro parece ser disparado aqui:

A versão do Android do dispositivo é o Android 11.

 

[Daniel Simoes]

Experimente desabilitar o Range Check Error, nessa Unit

{$R-} // Range check off

https://docwiki.embarcadero.com/RADStudio/Alexandria/en/Range_checking
                          

[Ederson Selvati]

Daniel,

Desabilitando a msg nao aparece mais, mas a porta não é carregada no combo de portas no demo do ACBrBal, já no Alexandria funciona perfeito.

[Daniel Simoes]

@Ederson Selvati,

Vou precisar montar um ambiente com essa versão do Delphi, para testar...

 

[Ederson Selvati]

Certo Daniel

Acabei me enrolando aqui com a balança e nosso projeto está todo no 10.4.2, porem nao vou conseguir migrar pro Alexandria no momento por conta do prazo que temos. Agradeço demais por sua colaboração.

[Daniel Simoes]

@Ederson Selvati, como estão os parâmetros do método "Open" no 10.4.2 ?

Não consegui reproduzir o problema, no 10.3.3

No caso abaixo, não ocorre RangeError pois o parâmetro Flags está declarado como Integer

[Daniel Simoes]

@Ederson Selvati, instalei um 10.4.2, compilei o Demo do ACBrBAL e ele rodou sem erros...

[Ederson Selvati]

Boa tarde Daniel

Acho que o problema e com o GS300 Gertec ou Android 11 que vem nele, quando compilo no Alexandria, a porta COM1 é detectada, quando compilo no Sydney dispara o range check error ao chamar o metodo AcharPortasSeriais....

 

[Daniel Simoes]

Humm.. realmente pode ser algo relacionado ao Android 11 e a compatibilidade do SDK utilizado na compilação...

[Ederson Selvati]

Pois é, coloquei aqui o mesmo SDK que uso no Alexandria, direcionei pra API 30 e mesmo assim nao detecta esta porta COM1 nem a bala. Mas como consegui solução com o Alexandria e os prazos estouraram, vou migrar aqui e ver se vai dar tudo certo, depois com calma vou tentando apurar como resolver isso.

No mais, agradeço pelo seu empenho e dedicação de sempre.

[Daniel Simoes]

Consegui reproduzir o problema no Delphi 11..

O que ocorre é que Fhandle é declarado como THandle = NativeUInt  (só aceita valores positivos)

E quando ocorre erro na abertura da porta, o retorno é -1

Vou tentar compreender melhor, porque isso está ocorrendo...

[Daniel Simoes]

Esse bloco de código, trata melhor o erro de abertura de porta...

  try
    {$IFNDEF FPC}
      {$IFDEF POSIX}
        FHandle := open(MarshaledAString(AnsiString(FDevice)), O_RDWR or O_SYNC);
      {$ELSE}
        FHandle := THandle(Libc.open(pchar(FDevice), O_RDWR or O_SYNC));
      {$ENDIF}
    {$ELSE}
      FHandle := THandle(fpOpen(FDevice, O_RDWR or O_SYNC));
    {$ENDIF}
  except
    On ERangeError do
      Fhandle := INVALID_HANDLE_VALUE;
  end;

Creio que o problema agora, seja questão de permissão de acesso... Deve haver alguma nova permissão a ser solicitada...

synaser.pas

[Ederson Selvati]

Bom dia Daniel

Vou testar e te passo o feedback

Vlw!!!