Bonjour,

j'ai une application cliente développée en WM12 et une appli serveur développée en delphi 7 elles communiquent via socket.
Cependant, si mon serveur plante (fermeture intempestive comme un redémarrage). Je tente de relancer une connexion de cette manière :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
POUR i = 1 A 5
	SI gbReconnexionOk = Faux ALORS
		LIB_SuppressionSiArret = "Tentative de connexion au serveur.. n°"+i
		ConnexionSocket(csNomSocket,CnPortCnx, gfsServeur)
		Multitâche()	
	SINON
		gbReconnexionOk = Vrai
		FENAccueil.LIB_User = gsStockeNomUser
		LIB_SuppressionSiArret = "Reconnexion au serveur validée"
		FENAccueil.IMG_Connect..Valeur = fRepExe() +"\Connect.gif"
		gbConnexionActive = Vrai
		ThreadExécute("ThreadReception", threadNormal, Reception)
		DélaiAvantFermeture(300)
		Ferme(PopupPbConnexion)
	FIN
FIN
SI gbReconnexionOk = Faux ALORS
	LIB_SuppressionSiArret = "Echec de la reconnexion, voulez vous retenter ?"
FIN
Cependant cette phase de ConnexionSocket est longue, trop longue elle met environ 1minute par tentative (j'ai 5 tentatives)...

Est ce normal ? Comment puis-je y remédier ?