Pesquisar na Comunidade
Showing results for tags 'sockets'.
Encontrado 2 registros
-
Eu já Procurei aki no Forum e Não consegui encontrar, Sou Programador Delphi Iniciante, Eu estou criando um Sistema onde eu pretendo colocar o Sistema em comunicação com AcbrMonitor atraves da conexão TCP\IP, Se possível alguem poderia me disponibilizar um modelo de conexão com o Delphi atraves do TCP/IP, Desejo usar o ACBrMonitor e não os componentes ACBR pois Vejo o ACBrMonitor com uma boa ferramenta e para ter a opção de varias pessoas emitir notas fiscais , e gostei muito da ideia de no futuro uma integração com um sistema em PHP, Quem puder me enviar um modelo, ficarei muito grato , pois o conteudo que encontrei aki no forum não consegui reproduzir em minha maquina, eu consegui ate conectar pelo IdTCPClient(Indy) e Tambem pelo TClientSocket(Delphi) mais não consiguo mandar o comando para o servidor, Meu email é [email protected]. Desde já muito Obrigado
-
Resposta cortando informação - ACBrMonitorPlus - TCP/IP - v0.1.7.3
um tópico no fórum postou Fernando Amado ACBrMonitor PLUS
Olá Pessoal, Estou tendo problemas na leitura da resposta do ACBrMonitorPlus via sockets. Envio o comando e ele executa corrertamente, porém na hora que leio o retorno ele para antes da mensagem, como se o terminador estivesse em lugar errado. Para enviar o comando e ler a resposta faço assim: var Retorno : AnsiString; cmdTCP: TTCPBlockSocket; begin cmdTCP:= TTCPBlockSocket.Create; try cmdTCP.Connect(fsHost, IntToStr(fsPort)); sleep(1000); cmdTCP.SetSendTimeout(1000); cmdTCP.SendString(fsPrefixo + Comando + chrTerminador); Retorno := AnsiToUtf8(cmdTCP.RecvTerminated(1000, #03)); finally cmdTCP.Free; end; Ele executa o comando, no painel do Monitor aparece a resposta, mais dentro da minha variável Retorno aparece apenas: "ACBrMonitor/ACBrNFeMonitor PLUS Ver. 0.1.7.3 Conectado em: 27/08/15 08:48:44 Máquina: 127.0.0.1 Esperando por comandos." Como se o terminador estivesse em local errado. Anexo o log do monitor para auxiliar. LOG.TXT
