Novo componente ACBrMTER - MicroTerminais TCP/IP

[Daniel Simoes]

Olá para todos...

Acabei de subir para o SVN, uma novo componente, ACBrMTER

-- ACBrMTer --
[+] Adicionado novo componente ACBrMTer, que atua como servidor de MicroTerminais
    TCP/IP, suportando atualmente os protocolos: VT100, StxEtx, PMTG
    (por: Elias César Vieira e DSA) 

Alguns Links para estudo:

Emulador Wilbor (protocolos VT100 e Stx/Etx)
- http://www.gradual.com.br/prod/programas/Emulador Terminal.zip

Manual Terminal Wilbor (contém manual protocolo VT100 e Stx/Stx)
- http://www.gradual.com.br/prod/manuais/Terminal_Ethernet.pdf

Emulador Will Tech (Protocolo VT100)
- http://www.willtech.com.br/download/Emulador_2016.rar

Manual Terminal WillTech (contem manual protocolo VT100)
- http://www.willtech.com.br/download/MANUAL_TC_V1.80_2013.pdf

Emulador Gertec (Protocolo PMTG)
- http://www.gertec.com/Modulos/Container/PopUpDownload.aspx?codDownload= 541&codIdioma= 1

Manual de Comunicação Protocolo PMTG
http://www.gertec.com/Modulos/Container/PopUpDownload.aspx?codDownload= 245&codIdioma= 1

Manual Bematech FIT (VT100 e Stx/Etx)
http://www.bematech.com.br/equipamentos/produto/fit-basico

 

Não deixe de ler este tópico:

 

[nicolasbraz]

Esse componente é só para Lazarus? Ou terá para delphi também?

Para o Delphi eu só achei os .pas e não achei exemplo do uso do componente.

Editado 19 Julho, 2016 por nicolasbraz

[Juliomar Marchetti]

39 minutos atrás, nicolasbraz disse:

Esse componente é só para Lazarus? Ou terá para delphi também?

Boa tarde

está sim para delphi! tu baixou e recompilou os pacotes?

[Daniel Simoes]

Talvez não exista os Demos para Delphi... Mas a versão em Lazarus poderia ser facilmente convertida 

[Juliomar Marchetti]

7 horas atrás, Daniel Simoes disse:

Talvez não exista os Demos para Delphi... Mas a versão em Lazarus poderia ser facilmente convertida 

já farei isso e vou subir no svn o exemplo

[nicolasbraz]

15 horas atrás, Juliomar Marchetti disse:

Boa tarde

está sim para delphi! tu baixou e recompilou os pacotes?

Eu estou na revisão: 12024 do SVN. 

 

8 horas atrás, Daniel Simoes disse:

Talvez não exista os Demos para Delphi... Mas a versão em Lazarus poderia ser facilmente convertida 

Daniel, Isso quem faz sou eu? Ou vocês fazem e já colocam na nova revisão do acbr? 

 

1 hora atrás, Juliomar Marchetti disse:

já farei isso e vou subir no svn o exemplo

Juliomar, fazendo isso teria um componente visual para o Delphi com o exemplo? Se puder fazer isso agradeceria muito. 

[Juliomar Marchetti]

Boa tarde

exemplo adicionado e funcionando em delphi seattle e demais que sejam compatível unicode

[nicolasbraz]

3 minutos atrás, Juliomar Marchetti disse:

Boa tarde

exemplo adicionado e funcionando em delphi seattle e demais que sejam compatível unicode

Boa tarde, 

Muito obrigado! Eu tinha visto o post agora a pouco e não tinha reposta ai então eu atualizei o ACBR e veio a versão e em seguida você me respondeu! 

[nicolasbraz]

Em 20/07/2016 at 14:27, Juliomar Marchetti disse:

Boa tarde

exemplo adicionado e funcionando em delphi seattle e demais que sejam compatível unicode

Bom dia Juliomar, 

Eu tentei corrigir o erro mas o exemplo está com erro! Quando eu tento trocar de aba "fluxo de vendas" Dá erro e eu não consigo simular. 

[nicolasbraz]

Eu consegui fazer o meu sistema funcionar com o microterminal mas eu estou com um problema quando mando desativar o componente do acbr e tem microterminal conectado ele dá erro em uma thread.

[Daniel Simoes]

Qual a exata msg, e como reproduzir o problema, no Demo do ACBr ?

[nicolasbraz]

17 minutos atrás, Daniel Simoes disse:

Qual a exata msg, e como reproduzir o problema, no Demo do ACBr ?

Daniel, Ative o componente do acbr e deixe que o microterminal se conecte ao Demo do acbr em seguida tente fechar o Demo ou desativar o componente. 

E eu preciso clicar 3x no desativar para de fato desativar o componente. 

Ah outra coisa o problema do componente não conseguir simular uma venda foi porque os clientDataSet vieram vazios eu inclui os campos na mão baseado no fonte e assim eu consegui ver o Demo

 

[weliton_cena]

Em 28/07/2016 at 10:44, nicolasbraz disse:

Bom dia Juliomar, 

Eu tentei corrigir o erro mas o exemplo está com erro! Quando eu tento trocar de aba "fluxo de vendas" Dá erro e eu não consigo simular. 

Amigo como voce conseguiu resolver esse problema

[nicolasbraz]

22 minutos atrás, weliton_cena disse:

Amigo como voce conseguiu resolver esse problema

Adiciona no clientDataSet "memTerminais" Os seguintes Fields: IP_TERMINAL, COMANDA, RESPOSTA E STATUS todos do tipo string. 
No clientDataSet "memComandas" os seguintes Fields: CODCOMANDA e QTD_ITENS dos tipos string.

Já deve funcionar. 

[weliton_cena]

Agora esta dando o seguinte erro memComandas missing data provider or data packet

49 minutos atrás, nicolasbraz disse:

Adiciona no clientDataSet "memTerminais" Os seguintes Fields: IP_TERMINAL, COMANDA, RESPOSTA E STATUS todos do tipo string. 
No clientDataSet "memComandas" os seguintes Fields: CODCOMANDA e QTD_ITENS dos tipos string.

Já deve funcionar. 

 

[nicolasbraz]

8 minutos atrás, weliton_cena disse:

Agora esta dando o seguinte erro memComandas missing data provider or data packet

 

OnSHOW do form: 

memComandas.CreateDataSet;
  memTerminais.CreateDataSet;
memTerminais.Open;

memComandas.Open;

 

Coloque o código acima no onShow e tira da troca do pageControl. 

[weliton_cena]

Amigo obrigado .. resolvi  era so cliclar com o botão direito em cima do clientdataset e cliclar em create dataset

 

[nicolasbraz]

20 horas atrás, Daniel Simoes disse:

Qual a exata msg, e como reproduzir o problema, no Demo do ACBr ?

Daniel, Bom dia! Conseguiu reproduzir o erro? 

 

 

2 minutos atrás, weliton_cena disse:

Amigo obrigado .. resolvi  era so cliclar com o botão direito em cima do clientdataset e cliclar em create dataset

 

Conecta 1 micro terminal e clica em desativar veja se aparece o mesmo erro que deu no meu. 

[weliton_cena]

Opa, deu o mesmo erro !

[EliasCesar]

Vou tentar reproduzir e corrigir o erro, 
Posto aqui o resultado assim que conseguir...

[nicolasbraz]

3 horas atrás, EliasCesar disse:

Vou tentar reproduzir e corrigir o erro, 
Posto aqui o resultado assim que conseguir...

OK, no aguardo.

[EliasCesar]

Efetuei testes no Lazarus, porém o problema não está ocorrendo...

(Obs: As correções citadas acima já estão disponíveis)

[nicolasbraz]

43 minutos atrás, EliasCesar disse:

Efetuei testes no Lazarus, porém o problema não está ocorrendo...

(Obs: As correções citadas acima já estão disponíveis)

Elias, testei aqui e parte do problema foi resolvido quando eu mando DESATIVAR o componente ele dá erro. 

O erro que ficou no memo é:   - Erro: -1 - Other Winsock error (-1)

Editado 3 Agosto, 2016 por nicolasbraz

[Daniel Simoes]

Apliquei uma possível correção para o  problema...

Citar

-- ACBrSocket --
[-] Correção de Bug em TACBrTCPServer.Desativar, em Delphi, onde o erro
    thread error the handle is invalid (6)" era disparado no caso de existir
    conexões ativas (por:DSA)

-- ACBrMTer* --
[-] Correção de Enconding para ANSI. Remoção de variáveis não utilizadas

 

[nicolasbraz]

8 horas atrás, Daniel Simoes disse:

Apliquei uma possível correção para o  problema...

 

Daniel, pelo o que eu testei em emuladores aqui agora está resolvido! O erro só aparece se você agora deixar o componente ativo e fechar mas para tratar isso é só desativar o componente antes de fechar a tela. 

Daniel, eu não sei se alguém pode tirar uma dúvida minha mas eu precisava em um determinado estado do meu micro terminal, quando o cliente digitar algo aparecer " * " (Asterisco) e não achei nada no exemplo do acbr.