obtenir adresse ip (generale)

**alex01pernot** · 26/03/2006, 19h25

j'ai regardé la FAQ : http://delphi.developpez.com/faq/?page=reseau#adresseip

le probleme c'est que j'utilise delphi 7 et que avec le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Uses Sockets;
 
function getIP:string;
Begin
  With TCustomIpClient.Create(Nil) do
  Begin
    Result:=LocalHostAddr;
    Free;
  End;
End;

il ne me donne que l'adresse ip interne et j'aimerai savoir celle que j'ai sur internet.
merci d'avance.

**Philippe Gormand** · 26/03/2006, 20h28

Salut.

L'adresse que tu as sur Internet est fournie par ton fournisseur FAI
(Fournisseur d'Accès Internet). Le système est configuré en DHCP. C'est
à dire que c'est le serveur réseau (internet) qui te fourni et qui fixe ton
adresse IP. Donc, l'adresse IP que tu récupère est celle de ton acces internet.
Attention, cette adresse n'est pas fixe. Elle peut être changée par le serveur selon sa gestion.

Petite question : Est ce que tu ne confondrais pas avec l'adresse MAC de
la carte réseau qui ellle, a une adresse fixe matérielle (il en existe pas
2 au monde, c'est une adresse constructeur) ?

Tiens moi au courant,ça m'interresse.

A+

**alex01pernot** · 26/03/2006, 21h49

je sais bien tout sa mon probleme c'est quand je rentre ce code il me donne 192.168.1.100 par ex (adresse ip dans mon reseau domestique) et moi je voudrai celle de mon fournisseur comme tu le mentionnais
sait tu comment avoir cette adresse (il disent dans la FAQ comment l'avoir mais pour les ancienne version (<ou= a delphi 5)
merci d'avance

**Philippe Gormand** · 27/03/2006, 14h23

Etant donné que la configuration réseau pour internet est en DHCP
(c'est à dire que c'est le serveur distant qui fournit l'adresse) tu ne
peux la connaitre seulement si tu est connecté.

Qand tu es connecté sur internet, tu fait "Démarrer -> executer"
dans zone de saisie, tape la commande "cmd". Une fenêtre noir
s'affiche. Tu tape la commande ipconfig /all
Toute la configuration réseau et les connextions s'affichent.

Je ne sais pas si cela répond à ton problème, mais cela devrait te metre
sur la voie. Je ne pense pas qu'il y ai une difference avec l'objet
TCustomIpClient entre les differentes versions de DELPHI.

A+