Problème simple avec "TclientSocket" - Delphi 7

MetsysOidua - 28 juin 2013 à 21:48
 MetsysOidua - 28 juin 2013 à 22:24
Bonjour, j'aimerais faire un petit client en mode console qui tente plusieurs fois de se connecter au serveur, mais qui une fois connecté -> stop les tentatives et reste connecté.

Sauf que voilà: moi mon code il créer de nouvelles connexions en boucle :/
Mon code: http://pastebin.com/5ZuR9DNX

Merci :3

2 réponses

boby_la1 Messages postés 4 Date d'inscription mardi 7 février 2006 Statut Membre Dernière intervention 15 juillet 2013
28 juin 2013 à 22:20
Salut
la recherche de ton code est délicate à l'URL cité.
essayes de placer ton code avec le message.
MERCI.
MetsysOidua
28 juin 2013 à 22:24
Sorry, voila:
sock:= TclientSocket.Create(nil);
sock.Address := '127.0.0.1';
sock.port := 1337;
 
While Sock.Active=false do
begin
sock.Open;
Writeln(sock.Address+' # '+inttostr(sock.port));
sleep(2500)
end;
Rejoignez-nous