Luciano, funcionou. A questão era o tempo para estabelecimento do socket. Com o código que você enviou este problema foi resolvido.
Muito Obrigado 2008/6/18 Luciano Calenzani Simões <[EMAIL PROTECTED]>: > Eu uso esse componente com esse código e funciona direitinho: > > ClientSocket.Host := 1.1.1.1; > ClientSocket.Port := 1; > while not ClientSocket.Socket.Connected do > begin > ClientSocket.Active := True; > > Application.ProcessMessages; > Sleep(1000); > end; > > > Luciano Calenzani Simões > > ----- Mensagem original ---- > De: Diogo de Oliveira Cunha <[EMAIL PROTECTED]<diogo.cunhajf%40gmail.com> > > > Para: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br> > Enviadas: Quarta-feira, 18 de Junho de 2008 17:19:01 > Assunto: Re: [delphi-br] Problemas com Socket > > Infelizmente não retorna mensagem de erro nenhuma. > > Coloquei um código no evento onError do Socket mas este não está sendo > executado . . . > > Com relação ao botão, já tentei também, mas infelizmente não surtiu nenhum > efeito . . . > > 2008/6/18 Davi Eduardo Borges Wall <[EMAIL PROTECTED] com.br>: > > > Se não conecta, deve retornar alguma mensagem de erro, correto ? > > > > ____________ _________ _________ __ > > > > De: [EMAIL PROTECTED] os.com.br <delphi-br%40yahoog rupos.com. br> > [mailto: > > [EMAIL PROTECTED] os.com.br <delphi-br%40yahoog rupos.com. br>] Em > nome de > > Diogo de Oliveira Cunha > > Enviada em: quarta-feira, 18 de junho de 2008 16:55 > > Para: [EMAIL PROTECTED] os.com.br <delphi-br%40yahoog rupos.com. br> > > > Assunto: [delphi-br] Problemas com Socket > > > > > > Amigos boa tarde. > > > > Estou finalizando uma aplicação que trabalha com comunicação através da > > internet com um equipamento eletrônico. > > > > Para isto, estou utilizando o componente ClientSocket da paleta internet. > > > > O problema que está acontecendo é que eu não estou conseguindo conectar o > > clientsocket em tempo de execução. Por exemplo, se em design time eu > altero > > manualmente a propriedade active do clientesocket para true e executo o > > programa consigo estabelecer comunicação e o programa funciona bem. > > Contudo, > > se eu tentar setar a propriedade active do clientsocket para true em run > > time o clientesocket simplesmente não conecta. > > > > O comando está no evento onCreate do Form. > > > > Se alguém tiver alguma idéia ficaria muito grato. > > > > Desde já agradeço a atenção. > > > > -- > > "Não te esqueças de que o arado, dilacerando o solo, acaba igualmente > > desmantelado e ferido, entretanto, desse choque de forças surge o pão que > > te > > supre a mesa." > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > -- > "Não te esqueças de que o arado, dilacerando o solo, acaba igualmente > desmantelado e ferido, entretanto, desse choque de forças surge o pão que > te > supre a mesa." > > [As partes desta mensagem que não continham texto foram removidas] > > Abra sua conta no Yahoo! Mail, o único sem limite de espaço para > armazenamento! > http://br.mail.yahoo.com/ > > [As partes desta mensagem que não continham texto foram removidas] > > > -- "Não te esqueças de que o arado, dilacerando o solo, acaba igualmente desmantelado e ferido, entretanto, desse choque de forças surge o pão que te supre a mesa." [As partes desta mensagem que não continham texto foram removidas]