Socket.OpenPublicado por Jeam (3 intervenciones) el 04/03/2003 03:26:00Disculpen alguien me podría explicar como utilizo el Socket.Open, podrían poner un ejemplo plz?Valora esta pregunta0Responder
RE:Socket.OpenPublicado por Ernesto D'Spirito (706 intervenciones) el 04/03/2003 08:59:08Aquí tienes un ejemplo sencillo: procedure TForm1.Button1Click(Sender: TObject); begin ClientSocket1.Host := 'www.borland.com'; ClientSocket1.Port := 80; ClientSocket1.Open; end; procedure TForm1.Button2Click(Sender: TObject); begin ClientSocket1.Close; end; procedure TForm1.ClientSocket1Connect(Sender: TObject; Socket: TCustomWinSocket); begin ShowMessage('Conectado'); end; Espero que te sirva. Ernesto D'Spirito http://www.latiumsoftware.com/es/index.phpValora esta respuesta0Comentar