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]

Responder a