[AsteriskBrasil] RES: Integração com Delphi

Ricardo Mendes rickbamen em gmail.com
Quinta Agosto 16 12:51:13 BRT 2012


Eu to no D7.
Estou usando a classe do synapse que não é componente visual.
Com isso não fico na dependencia do Indy.

Ricardo Mendes

Em 16 de agosto de 2012 12:25, Hudson Cardoso
<hudsoncardoso em hotmail.com>escreveu:

>  Voce ta usando D7 ? usa com ssh?
> que tipo de socket é esse ? componente nativo ?
>
>
>
> Hudson
> 048 8413 7000
>
> Para quem nao cre, nenhuma prova converte,
> Para aquele que cre, nenhuma prova precisa.
>
>
> ------------------------------
> Date: Thu, 16 Aug 2012 08:58:56 -0300
> From: rickbamen em gmail.com
> To: asteriskbrasil em listas.asteriskbrasil.org
> Subject: Re: [AsteriskBrasil] RES: Integração com Delphi
>
>
> Silvio
> A aplicação não levou 10 minutos para fazer essa interação...o que
> aconteceu foi apenas que eu levei 10 minutos para ver a sequencia dos
> comandos e digitar...srsrsrs
>
> Ricardo Mendes
>
> Em 16 de agosto de 2012 08:49, Silvio Duclos <silvio em tospeak.com.br>escreveu:
>
> Bom dia, ****
>
> ** **
>
> Seu sistema levou 10 minutos desde a primeira interação com o manager até
> a ultima, ****
>
> É isso mesmo ? ****
>
> ** **
>
> Silvio Duclos ****
>
> ** **
>
> *De:* asteriskbrasil-bounces em listas.asteriskbrasil.org [mailto:
> asteriskbrasil-bounces em listas.asteriskbrasil.org] *Em nome de *Ricardo
> Mendes
> *Enviada em:* terça-feira, 14 de agosto de 2012 13:58
> *Para:* asteriskbrasil em listas.asteriskbrasil.org
> *Assunto:* [AsteriskBrasil] Integração com Delphi****
>
> ** **
>
> Boa Tarde Galera...****
>
> Ja perguntei aqui na lista mas vamos tentar novamente...****
>
> Seguindo os conselhos...ja habilei o mananger do asterisk.****
>
> Tentei utilizar socket com delphi para ver se da resultado, abaixo segue
> os retornos que tive...****
>
> ** **
>
> primeiro eu tentei me conectar...****
>
> --> Tentativa de Conexão ás 14/08/2012 12:38:51****
>
> ----> Asterisk Call Manager/1.1****
>
> ** **
>
> depois tentei enviar os comandos abaixo separadamente.****
>
> --> Comando enviado: Action: Login ás 14/08/2012 12:41:21****
>
> ----> Fim do retorno ás 14/08/2012 12:41:36****
>
> ** **
>
> --> Comando enviado: UserName: teste ás 14/08/2012 12:42:56****
>
> ----> Fim do retorno ás 14/08/2012 12:43:16****
>
> ** **
>
> --> Comando enviado: Secret: abc123 ás 14/08/2012 12:43:50****
>
> ----> Fim do retorno ás 14/08/2012 12:44:43****
>
> ** **
>
> --> Comando enviado: Action: Command ás 14/08/2012 12:45:02****
>
> ----> Fim do retorno ás 14/08/2012 12:45:55****
>
> ** **
>
> --> Comando enviado: Command: sip show peers ás 14/08/2012 12:46:17****
>
> ----> Fim do retorno ás 14/08/2012 12:47:07****
>
> ** **
>
> A principio nenhum comando me trouxe retorno...e ja não sei mais o que
> mexer para tentar fazer essa integração com delphi funcionar.****
>
> ** **
>
> Vou postar trecho do codigo que fiz.****
>
> ** **
>
> ** **
>
> procedure Tfrm_Principal.btnEnviarComandoClick(Sender: TObject);****
>
> var****
>
>   tmpComando: string;****
>
> begin****
>
>   if (trim(edtComando.Text) <> '') then****
>
>   begin****
>
>     tmpComando := trim(edtComando.Text) +
> ifthen((groupTerminador.ItemIndex = 0), Acao, Execucao);****
>
>     ListaComando.Lines.Add('Comando enviado: ' + trim(edtComando.Text) + '
> ás ' + FormatDateTime('DD/MM/YYYY HH:MM:SS', now));****
>
>     EnviaComando(tmpComando);****
>
>   end;****
>
> ** **
>
> end;****
>
> ** **
>
> procedure Tfrm_Principal.EnviaComando(pComando: string);****
>
> var****
>
>   tmpRetorno: string;****
>
> begin****
>
> ** **
>
>   ConectaSocket.SendString(pComando);****
>
> ** **
>
>   repeat****
>
>     tmpRetorno := ConectaSocket.RecvPacket(StrToIntDef(edtTimeOut.text,
> 2000));****
>
>     memoRetorno.Lines.Add(trim(tmpRetorno));****
>
>   until tmpRetorno = '';****
>
> ** **
>
>   memoRetorno.Lines.Add('Fim do retorno ás ' + FormatDateTime('DD/MM/YYYY
> HH:MM:SS', now));****
>
>   memoRetorno.Lines.Add(StringOfChar('-', 50));****
>
> ** **
>
>   edtComando.Clear;****
>
>   groupTerminador.ItemIndex := 0;****
>
> end;****
>
> ** **
>
> ** **
>
> Se alguem puder me ajudar a tentar fazer um simples exemplo dessa conexão
> eu agradeço.****
>
> ** **
>
> Saudações.****
>
> ** **
>
> Ricardo Mendes****
>
> ** **
>
> _______________________________________________
> KHOMP Inovação: External Board Series
> Módulos de 1/2 rack e 1U para todas as interfaces e soluções Asterisk e
> FreeSWITCH.
> Tenha a External Series Experience na sua aplicação. Visite www.khomp.com
> _______________________________________________
> DIGIVOICE  Fabricante de Placas de Voz e Channel Bank
> 20 anos de experiência com E1(R2/ISDN), FXS, FXO e GSM
> Centro Treinamento - Curso de PABX IP -  Asterisk  - Site
> www.digivoice.com.br
> ________
> YEALINK: Telefones IP e VídeoPhones IP com o melhor custo/benefício do
> mercado.
> email: yealink em commlogik.com.br | www.commlogik.com.br | (11) 5503-1011
> ______________________________________________
> Para remover seu email desta lista, basta enviar um email em branco para
> asteriskbrasil-unsubscribe em listas.asteriskbrasil.org
>
>
>
> _______________________________________________ KHOMP Inova��o: External
> Board Series M�dulos de 1/2 rack e 1U para todas as interfaces e solu��es
> Asterisk e FreeSWITCH. Tenha a External Series Experience na sua aplica��o.
> Visite�www.khomp.com _______________________________________________
> DIGIVOICE Fabricante de Placas de Voz e Channel Bank 20 anos de experi�ncia
> com E1(R2/ISDN), FXS, FXO e GSM Centro Treinamento - Curso de PABX IP -
> Asterisk - Site www.digivoice.com.br ________ YEALINK: Telefones IP e
> V�deoPhones IP com o melhor custo/benef�cio do mercado. email:
> yealink em commlogik.com.br | www.commlogik.com.br | (11) 5503-1011
> ______________________________________________ Para remover seu email desta
> lista, basta enviar um email em branco para
> asteriskbrasil-unsubscribe em listas.asteriskbrasil.org
>
> _______________________________________________
> KHOMP Inovação: External Board Series
> Módulos de 1/2 rack e 1U para todas as interfaces e soluções Asterisk e
> FreeSWITCH.
> Tenha a External Series Experience na sua aplicação. Visite www.khomp.com
> _______________________________________________
> DIGIVOICE  Fabricante de Placas de Voz e Channel Bank
> 20 anos de experiência com E1(R2/ISDN), FXS, FXO e GSM
> Centro Treinamento - Curso de PABX IP -  Asterisk  - Site
> www.digivoice.com.br
> ________
> YEALINK: Telefones IP e VídeoPhones IP com o melhor custo/benefício do
> mercado.
> email: yealink em commlogik.com.br | www.commlogik.com.br | (11) 5503-1011
> ______________________________________________
> Para remover seu email desta lista, basta enviar um email em branco para
> asteriskbrasil-unsubscribe em listas.asteriskbrasil.org
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://listas.asteriskbrasil.org/pipermail/asteriskbrasil/attachments/20120816/0ca10289/attachment.htm 


Mais detalhes sobre a lista de discussão AsteriskBrasil