Bonjour,
Je développe un soft avec Delphi 2006 et Indy 10 sous WinXP.
Je me connecte à un whois sur internet à l'aide d'IdWhois d'Indy 10. Le problème survient lorsque le serveur whois est trop demandé, le composant n'arrivant pas à se connecter au Whois pendant le temps imparti, renvoie un message d'erreur et fait planter l'application.
J'aimerais supprimer ce message d'erreur et envoyer une simple mise en garde à l'utilisateur lui disant que sa requête n'a pas pu être traitée.
J'ai bien imaginé plusieurs possibilités mais rien n'y fait ...
D'avance merci pour votre aide.
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
20
21
22 Procedure [...] var WhoIs : TIdWhois; Resultat : String; begin WhoIs := TIdWhois.Create; WhoIs.Port := 43; WhoIs.Host := 'whois.truc'; If (WhoIs.Connected = True) then begin Resultat := WhoIs.WhoIs(AString); end Else begin Resultat := '91'; end; WhoIs.Free; [...]![]()
Partager