He detectado que en la parte:
...................
FormServidor.ClientSocket1.Host:=ClientText;
FormServidor.ClientSocket1.Port:=21;
FormServidor.ClientSocket1.Active:=True;
if FormServidor.ClientSocket1.Active then
FormServidor.ClientSocket1.Socket.SendText(Memo1.Text + ' : '+ DateToStr(Date) + ' ' + TimetoStr(Time));
.......................................
FormServidor.ClientSocket1.Active:=True; no me lo pone a true en el watch.
¿alguna idea de porque?
|