Flavio Eduardo

Caro Jhonas segui o recomendado, mas ta me retornando esse erro: Error connecting with SSL. Alguma idéia?

Jhonas, obrigado pela atenção, mas o conponente que estou usando é, IdTCPClient e não IdSMTP, com o IdSMTP funciona legal, talvez seja por serem protocolos difernets?

Olá pessoal, tenho um sistema de chat em delphi 7 que está rodando bem, estou suando os componentes: IdTCPClient1, IdAntiFreeze1, alguns Edit´s , um Memo e um BitBtn com o seguinte código: begin if IdTCPClient1.Connected then IdTCPClient1.Disconnect else begin IdTCPClient1.Host := lbEdtServidor.Text; IdTCPClient1.Port := StrToInt(lbEdtPorta.Text); IdTCPClient1.Connect(5000); end; end; Gostaria de implementar SSL no chat, tentei colocar o componente IdSSLIOHandlerSocket1 ligado ao IdTCPClient1 na propriedade IOHandler e o seguinte código no BitBtn: begin if IdTCPClient1.Connected then IdTCPClient1.Disconnect else begin IdTCPClient1.Host := lbEdtServidor.Text; IdTCPClient1.Port := StrToInt(lbEdtPorta.Text); IdTCPClient1.IOHandler := IdSSLIOHandlerSocket1; if not IdTCPClient1.Connected then IdTCPClient1.Connect(5000) else IdTCPClient1.IOHandler := nil; end; end; mas não deu certo, alguém pode me dar um help?