Socket que funciona hasta la segunda vuelta

[Phacko]

Que tal a todos.

Efectivamente Enan0, fue un error de transcripcion que en realidad fue omisión ya que hice algunos cambios y no modifique lo que me indicaste, pero ya está corregido y como está actualmente trabajando, funcionando hasta la "segunda vuelta".

Gracias, agradesco tu tiempo.

Si alguien me puede dar alguna idicación se los voy a agradecer, yo por mi perte continúo probando.

Buena noche por aca, buen día por allá.

[Enan0]

si queres y no te es "peligroso" por tu trabajo o lo que esa. Podes pasar el codigo y se puede intentar Depurar.

por otro lado estoy escribiendo algo muy sencillo para apagar la PC (que es la instruccion que me acuerdo y te cuento en que resulta)

[Enan0]

Ya vi cual es tu Error te Falta un #13#10 despues del '1'
seria

Código Delphi [-]

......
.....
....Sendtext('1'+#13#10);
....
....
...

Igual aca te dejo un cliente y un servidor esta hecho con los Sockets de la paleta Internet y el codigo es de delphi 5 (seria 100 % compatible con delphi6) cualquier error que te de que Falta algo referente a Variant's , agrega dicha Unit en los uses

http://rapidshare.de/files/37237645/Sockets.rar.html

Saludos
PD; Si podes con Los indy Sockets bueno estaria que los uses. pero la verdad el server de Indy a mi me vuelve loco y lo puedo hacer funcionar como quiero

[Phacko]

Que tal Enan0??? disculpa mi total falta de agradecimiento, tuve que dejar por un buen tiempo esto y despues se me olvido lo que estaba haciendo, ya después lo retome y se soluciono, la verdad ya ni recuerdo que fue lo que hice, pero lo que me aconsejaste lo voy a poner en marcha en otro proyectiyo que he comenzado con socket's, nuevamente gracias.

Saludos.

Buena madrugada por allá, buena tarde por acá.