TClientSocket.WaitForConnected
| TClientSocket = class (TObject) | Interface de TClientSocket | Exemples de TClientSocket |
Qubes 9.0 Attente de confirmation de la connection TCP
Syntaxe
Prototype changé!!! function WaitForConnected(timeoutMSec: Integer): Boolean (Qubes 10.0)
procedure WaitForConnected(timeoutMSec: Integer)
timeoutMSec: temps d'attente maximum en millisecondes
Remarques
Attend au plus timeoutMSec millisecondes pour que Connected passe à true, et rend le contrôle dès que l'état de la connexion à changé (passé à Connected, connexion perdue...).
L'usage de cette méthode est préférable à une boucle d'attente (pas d'utilisation CPU et réactivité instantanée).
Si la connection est déjà établie, ou a déjà été clôturée, cette méthode retourne immédiatement.
Voir aussi Wait.
Exemples
var sock := new TClientSocket;
sock.Connect('127.0.0.1', 1234);
sock.WaitForConnected(1000);
if sock.Connected then
PrintLn('Connected :)')
else PrintLn('Connection failed :(');
sock.Connect('127.0.0.1', 1234);
sock.WaitForConnected(1000);
if sock.Connected then
PrintLn('Connected :)')
else PrintLn('Connection failed :(');