Récupérer son IP publique
Voici une fonction simple et efficace pour obtenir l’adresse IP publique d’un serveur ou d’un poste client.
function GetIPPublic: String;
var
HTTP: TIdHTTP;
begin
HTTP := TIdHTTP.Create(nil);
try
Result := HTTP.Get('http://myexternalip.com/raw');
except
Result := EmptyStr;
end;
FreeAndNil(HTTP);
end;Astuce
Vous pouvez remplacer l’URL par d’autres services similaires, comme :
Un petit clic (J'aime) qui fait plaisir !
