Discussion :

[nesquik]

Bonjour a tous
Je viens de debuter Delphi et je cherche a verifier si une adresse IP est correctement formee, g vu que l on pouvait utiliser GStack.qq chose mais ca ne passe ps delphi7 ignore cette maniere de verifier la validite.
G trouve cette maniere de proceder sur la faq de developper.com
Faut il utiliser les composants Indy pour que ca marche
je suis un peu perdu
Je vous remercie d avance

[nesquik]

Personne n a d'idee ?

[Mac LAK]

Sur mon site (URL dans ma signature), j'ai un composant pour ça, "TIPSelector". Tu en as les sources si besoin est, soit pour récupérer la routine correspondante, soit pour directement utiliser le composant.

[Reisubar]

delphi7 ignore cette maniere de verifier la validite.

C'est à dire ?

Faut il utiliser les composants Indy pour que ca marche

Il faut inclure l'unité qui propose la fonction de test, c'est tout. Pas besoin d'instancier un composant Indy pour cela...

[gilles641]

Je veux bien mais quelle unite ? je ne trouve rien concernant les ip ac indy

[saispasfau]

Tu veux juste vérifier si l'IP est comprise entre 0.0.0.0 et 255.255.255.255 ou autre chose ?

Je ne connais pas les composants Indy, mais je pense que tu peux faire une fonction qui vérifie si ton IP est correcte.

[Soulama]

Salut,
jai trouve ce bou de Code:

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
 
procedure TfrmPing.btnPingClick(Sender: TObject);
var
  i: integer;
begin
  ICMP.OnReply := ICMPReply;
  ICMP.ReceiveTimeout := 1000;
  btnPing.Enabled := False; try
    ICMP.Host := '192.168.11.33'; // ici tu met ton IP Adresse 
    for i := 1 to 4 do begin
      ICMP.Ping;
      Application.ProcessMessages;
      //Sleep(1000);
    end;
  finally btnPing.Enabled := True; end;
end;

avec ICMP: TIdIcmpClient; que tu dois declar´public ou private c comme tu veux