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]> Para: delphi-br@yahoogrupos.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]