Jump to content

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

Antonio Carlos L

Exemplo ACBrTCPServer

Recommended Posts

Ao rodar o exemplo percebi que ele não exibia o que era enviado pelo Cliente, e ao verificar descobri que o evento onRecebeDados esta com a assinatura diferente ( provavel o exemplo foi feito em uma versão ainda inicial ) 

 

procedure ACBrTCPServer1RecebeDados(const TCPBlockSocket: TTCPBlockSocket;   Recebido: String; var Enviar: String);

onde deveria ser

procedure ACBrTCPServer1RecebeDados(const TCPBlockSocket: TTCPBlockSocket;  const Recebido: AnsiString; var Enviar: AnsiString);

  • Thanks 1

Share this post


Link to post
Share on other sites

Pode ser que o Demo tenha sido feito em D7... onde AnsiString = String


Consultor SAC ACBr

Daniel Simões de Almeida
Ajude o Projeto ACBr crescer - Assine o SAC

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

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...